e54706ed |
1 | puts "============" |
2 | puts "OCC7186" |
3 | puts "============" |
4 | puts "" |
5 | ###################################################### |
6 | # Selecting an empty space with rectangle doesn't clear |
7 | # the current selection, when there is an opened local context |
8 | ###################################################### |
9 | |
10 | set BugNumber OCC7186 |
11 | |
12 | set mistake 0 |
13 | |
14 | box b 10 10 10 |
15 | vinit |
16 | vdisplay b |
17 | vfit |
e54706ed |
18 | vselmode 2 1 |
19 | |
4754e164 |
20 | vselect 1 1 407 407 |
e54706ed |
21 | |
4754e164 |
22 | set NbSelected1 [vnbselected] |
e54706ed |
23 | if { ${NbSelected1} != 12 } { |
24 | puts "Bad number of selected edges after rectangle selection all edges" |
25 | set mistake 1 |
26 | } |
27 | |
4754e164 |
28 | vselect 10 10 20 20 |
e54706ed |
29 | |
4754e164 |
30 | set NbSelected2 [vnbselected] |
e54706ed |
31 | if { ${NbSelected2} != 0 } { |
32 | puts "Error : Bad number of selected edges after rectangle selection an empty space" |
33 | set mistake 1 |
34 | |
35 | } |
36 | |
37 | set x [list 125 204 283 29 111 298 379 125 204 283 125 283] |
38 | set y [list 47 100 47 200 150 150 200 250 300 250 361 361] |
39 | |
ccadc126 |
40 | vaspects -setwidth 5 |
e54706ed |
41 | puts "" |
42 | for {set i 0} {$i < 12} {incr i} { |
ccadc126 |
43 | if { [vreadpixel [lindex ${x} $i] [lindex ${y} $i] rgb name] != "YELLOW" } { |
e54706ed |
44 | set mistake 1 |
45 | } |
46 | } |
e54706ed |
47 | puts "" |
48 | if { ${mistake} == 1 } { |
49 | puts "${BugNumber}: Faulty" |
50 | } else { |
51 | puts "${BugNumber}: OK" |
52 | } |
53 | |
54 | set only_screen 1 |