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

puts "========"
puts "Consider ZLayer properties while sorting list of picked entities"
puts "========"

pload MODELING VISUALIZATION

box b1 0 0 0 2 3 4
box b2 0 0 0 1 1 2
vertex v 100 -300 0

vclear
vinit View1
catch { vzlayer del 1 }
set aLayerId [vzlayer add]
vzlayer ${aLayerId} -enable depthClear
vaxo
vdisplay -noupdate -dispMode 1 -highMode 1 b1
vdisplay -noupdate -dispMode 1 -highMode 1 -layer ${aLayerId} b2
vsetcolor -noupdate b1 RED
vsetcolor -noupdate b2 GREEN
vfit
vrotate 0.1 0 0
vmoveto 100 300
vstate
vselect 100 300
vmoveto 0 0

set aSelColor [vreadpixel 100 300 rgb name]
if { $aSelColor != "GRAY72"} { puts "Error: wrong object has been selected" }

vdisplay -dispMode 0 -osd -2d -trsfPersPos -1 1 v

vdump $imagedir/${casename}.png
Commit	Line	Data
1593b4ee	1	puts "========"
	2	puts "Consider ZLayer properties while sorting list of picked entities"
	3	puts "========"
	4
	5	pload MODELING VISUALIZATION
	6
	7	box b1 0 0 0 2 3 4
	8	box b2 0 0 0 1 1 2
	9	vertex v 100 -300 0
	10
	11	vclear
	12	vinit View1
	13	catch { vzlayer del 1 }
7c3ef2f7	14	set aLayerId [vzlayer add]
7c3ef2f7	15	vzlayer ${aLayerId} -enable depthClear
1593b4ee	16	vaxo
1593b4ee	17	vdisplay -noupdate -dispMode 1 -highMode 1 b1
7c3ef2f7	18	vdisplay -noupdate -dispMode 1 -highMode 1 -layer ${aLayerId} b2
1593b4ee	19	vsetcolor -noupdate b1 RED
	20	vsetcolor -noupdate b2 GREEN
	21	vfit
	22	vrotate 0.1 0 0
	23	vmoveto 100 300
	24	vstate
	25	vselect 100 300
	26	vmoveto 0 0
	27
	28	set aSelColor [vreadpixel 100 300 rgb name]
	29	if { $aSelColor != "GRAY72"} { puts "Error: wrong object has been selected" }
	30
	31	vdisplay -dispMode 0 -osd -2d -trsfPersPos -1 1 v
	32
	33	vdump $imagedir/${casename}.png