0027818: Visualization - provide an interface to define highlight presentation properties
[occt.git] / tests / v3d / materials / bug27818_2
CommitLineData
8e5fb5ea 1puts "============"
2puts "OCC27818_2"
3puts "============"
4puts ""
5####################################################################################
6# Visualization - provide an interface to define highlight presentation properties:
7# test change of highlight and selection properties for particular objects
8####################################################################################
9
10
11pload QAcommands VISUALIZATION
12
13vinit
14OCC27818
15
16vfit
17
18vmoveto 200 200
19set aPixelColor [vreadpixel 200 200 name rgba]
20set aColor [lindex [split $aPixelColor { }] 0]
21set aTrsp [lindex [split $aPixelColor { }] 1]
22if {$aColor != "CHOCOLATE3" && abs($aTrsp - 1.0) < 0.1} {
23 puts "ERROR: dynamic highlight of 2nd box is displayed with wrong color!"
24}
25
26vdump $imagedir/${casename}_dyn.png
27
28vselect 50 200 1
29vselect 200 200 1
30vselect 350 200 1
31
32if {[vreadpixel 350 200 name rgba] != "RED3 1" || [vreadpixel 350 200 1 rgba] == [vreadpixel 200 200 1 rgba]} {
33 puts "ERROR: selection highlight of 3rd box is displayed with wrong color!"
34}
35
36vdump $imagedir/${casename}_sel.png