8a1170ad |
1 | puts "============" |
2 | puts "CR26462" |
3 | puts "============" |
4 | puts "" |
5 | |
6 | ########################################################################################## |
7 | puts "Visualization - selection does not adapt to line width change" |
8 | ########################################################################################## |
9 | |
10 | pload VISUALIZATION MODELING |
11 | |
12 | vinit |
13 | box b1 10 10 10 |
14 | box b2 10 10 10 |
15 | |
16 | vdisplay b1 b2 |
17 | vsetlocation b1 10 10 0 |
18 | vfit |
19 | |
20 | vaspects b1 b2 -setWidth 3 |
21 | |
22 | vselmode 2 1 |
23 | # try to select b1 and b2 |
24 | vselect 305 322 1 |
25 | vselect 103 322 1 |
26 | # check that both boxes were not selected with default tolerance value |
27 | set aNbSelected [vnbselected] |
28 | if {$aNbSelected != "0"} { |
29 | puts "ERROR: no boxes must be selected!" |
30 | } |
31 | |
32 | # increase tolerance for b1 |
33 | vaspects b1 -setSensitivity 2 4 |
34 | |
35 | # select edge of b1 |
36 | vselect 305 322 |
37 | # check that b1's edge was selected |
38 | set aNbSelected [vnbselected] |
39 | if {$aNbSelected != "1"} { |
40 | puts "ERROR: b1 was not selected" |
41 | } |
42 | # try to select b2 |
43 | vselect 103 322 1 |
44 | # check that increase of tolerance for b1 doesn't influence |
45 | # on b2 |
46 | set aNbSelected [vnbselected] |
47 | if {$aNbSelected != "1"} { |
48 | puts "ERROR: b2 is selected after b1's tolerance increased" |
49 | } |
50 | |
5747059b |
51 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |