0023493: Incorrect QAGetPixelColor usage
[occt.git] / tests / bugs / xde / bug25381
1 puts "============"
2 puts "CR25381"
3 puts "============"
4 puts ""
5 ######################################################
6 # Visualization - XCAFPrs_AISObject ignores visibility flag for sub-shapes
7 ######################################################
8
9 ReadStep D [locate_data_file bug25381_test_assembly_invisible.step]
10 XShow D
11 vfit
12
13 if { "[vreadpixel 198 172 rgb name]" != "WHITE" } {
14    puts "OK : XCAFPrs_AISObject get visibility flag for sub-shapes"
15 } else {
16    puts "Error : XCAFPrs_AISObject ignores visibility flag for sub-shapes"
17 }
18
19 set only_screen 1