[occt.git] / tests / bugs / vis / bug27986_1

puts "==========="
puts "OCC27986"
puts "Visualization - AIS_InteractiveContext::SetLocation() does not update dynamic highlighting"
puts "Test global selection"
puts "==========="
puts ""

pload MODELING VISUALIZATION
box b 1 2 3

vclear
vinit View1
vaxo
vdisplay -dispMode 0 -highMode 1 b
vfit
vzoom 0.5
vmoveto 250 250
vsetlocation b 2 1 0
set aColor1 [vreadpixel 220 200 rgb name]
set aColor2 [vreadpixel 350 220 rgb name]
if { "$aColor1" != "BLACK" || "$aColor2" != "CYAN2" } { puts "Error: dynamic highlighting is not updated" }

vdump $imagedir/${casename}.png
Commit	Line	Data
7bbccb5f	1	puts "==========="
	2	puts "OCC27986"
	3	puts "Visualization - AIS_InteractiveContext::SetLocation() does not update dynamic highlighting"
	4	puts "Test global selection"
	5	puts "==========="
	6	puts ""
	7
	8	pload MODELING VISUALIZATION
	9	box b 1 2 3
	10
	11	vclear
	12	vinit View1
	13	vaxo
	14	vdisplay -dispMode 0 -highMode 1 b
	15	vfit
	16	vzoom 0.5
	17	vmoveto 250 250
	18	vsetlocation b 2 1 0
	19	set aColor1 [vreadpixel 220 200 rgb name]
	20	set aColor2 [vreadpixel 350 220 rgb name]
ba00aab7	21	if { "$aColor1" != "BLACK" \|\| "$aColor2" != "CYAN2" } { puts "Error: dynamic highlighting is not updated" }
7bbccb5f	22
7bbccb5f	23	vdump $imagedir/${casename}.png