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

puts "==========="
puts "OCC27986"
puts "Visualization - AIS_InteractiveContext::SetLocation() does not update dynamic highlighting"
puts "Test local 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
vselmode b 4 1
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 local 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	vselmode b 4 1
	18	vmoveto 250 250
	19	vsetlocation b 2 1 0
	20	set aColor1 [vreadpixel 220 200 rgb name]
	21	set aColor2 [vreadpixel 350 220 rgb name]
ba00aab7	22	if { "$aColor1" != "BLACK" \|\| "$aColor2" != "CYAN2" } { puts "Error: dynamic highlighting is not updated" }
7bbccb5f	23
7bbccb5f	24	vdump $imagedir/${casename}.png