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

puts "============"
puts "CR25773"
puts "Check that properties of object can be applied to it (set to its drawer)"
puts "============"
puts ""

vinit View1
vclear

vaspects -defaults -setfreeboundarycolor 0 0 1

pcone c 0 5 10
explode c F
vdisplay c_1; vfit

set x 80
set y 103
checkcolor $x $y 0 0 1

vaspects c_1 -freeboundary off
checkcolor $x $y 0 0 0

vaspects c_1 -freeboundary on -setfreeboundarycolor 1 0 0 -setfreeboundarywidth 2
checkcolor $x $y 1 0 0

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
6262338c	1	puts "============"
	2	puts "CR25773"
	3	puts "Check that properties of object can be applied to it (set to its drawer)"
	4	puts "============"
	5	puts ""
	6
	7	vinit View1
	8	vclear
	9
	10	vaspects -defaults -setfreeboundarycolor 0 0 1
	11
	12	pcone c 0 5 10
	13	explode c F
	14	vdisplay c_1; vfit
	15
	16	set x 80
	17	set y 103
	18	checkcolor $x $y 0 0 1
	19
	20	vaspects c_1 -freeboundary off
	21	checkcolor $x $y 0 0 0
	22
	23	vaspects c_1 -freeboundary on -setfreeboundarycolor 1 0 0 -setfreeboundarywidth 2
	24	checkcolor $x $y 1 0 0
	25
5747059b	26	checkview -screenshot -3d -path ${imagedir}/${test_image}.png