0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug23012
1 puts "================"
2 puts "OCC23012"
3 puts "================"
4 puts ""
5 #######################################################################################
6 # Detection gives incorrect results
7 ######################################################################################
8
9 set BugNumber OCC23012
10
11 catch {pload XDE}
12
13 set x1 210
14 set y1 184
15
16 set x2 207
17 set y2 180
18
19 stepread [locate_data_file OCC23012-Sample_3.stp] a *
20 stepread [locate_data_file OCC23012-Sample_9.stp] b *
21 vdisplay a_1 b_1
22 vsetdispmode a_1 1
23 vsetdispmode b_1 1
24 vselprops -pixtol 0
25
26 set ColorBefore [vreadpixel ${x1} ${y1} rgb]
27
28 vmoveto ${x2} ${y2}
29
30 set ColorAfter [vreadpixel ${x2} ${y2} rgb]
31
32 if { "$ColorBefore" == "$ColorAfter" } {
33     puts "OK ${BugNumber}"
34 } else {
35     puts "Faulty ${BugNumber}"
36 }
37
38 vfit
39 checkview -screenshot -3d -path ${imagedir}/${test_image}.png