0028107: Visualization - provide a flexible interface to set custom hatch styles
[occt.git] / tests / bugs / vis / bug28061
1 puts "==========="
2 puts "OCC28061 - Highlighting of any object with HLR option leads to crash"
3 puts "==========="
4 puts ""
5
6 pload MODELING VISUALIZATION
7 box b 1 2 3
8
9 vclear
10 vinit View1
11 vdisplay -dispMode 0 b
12 vsetwidth -noupdate b 4
13 vfit
14 vhlr on
15
16 vmoveto 250 250
17 if { [vreadpixel 321 150 rgb name] != "CYAN1" } { puts "Error: the box is not highlighted" }
18
19 vdump $imagedir/${casename}.png