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

## It's impossible to make vdump with non-default parameters (width and height) on remote PC
puts "TODO ?OCC23813 Windows: Tcl Exception: Dumping failed!"
puts "TODO ?OCC23813 Windows: TEST INCOMPLETE"

puts "============"
puts "OCC23813"
puts "============"
puts ""
#######################################################################
# TKOpenGl, OpenGl_Texture ignores stride image property
#######################################################################

file delete -force ${imagedir}/texture_412.png
file delete -force ${imagedir}/texture_409.png

box b 1 2 3 
vinit
vsetdispmode 1
vdisplay b
vfit
vdump ${imagedir}/texture_409.png rgb 409 409
vdump ${imagedir}/texture_412.png rgb 412 412

# texture loaded correctly
vtexture b ${imagedir}/texture_412.png

# texture is corrupted during uploading to OpenGL
vtexture b ${imagedir}/texture_409.png

set only_screen 1
Commit	Line	Data
6c7ddf00	1	## It's impossible to make vdump with non-default parameters (width and height) on remote PC
	2	puts "TODO ?OCC23813 Windows: Tcl Exception: Dumping failed!"
	3	puts "TODO ?OCC23813 Windows: TEST INCOMPLETE"
	4
74706083	5	puts "============"
	6	puts "OCC23813"
	7	puts "============"
	8	puts ""
	9	#######################################################################
	10	# TKOpenGl, OpenGl_Texture ignores stride image property
	11	#######################################################################
	12
	13	file delete -force ${imagedir}/texture_412.png
	14	file delete -force ${imagedir}/texture_409.png
	15
	16	box b 1 2 3
	17	vinit
	18	vsetdispmode 1
	19	vdisplay b
	20	vfit
	21	vdump ${imagedir}/texture_409.png rgb 409 409
	22	vdump ${imagedir}/texture_412.png rgb 412 412
	23
	24	# texture loaded correctly
	25	vtexture b ${imagedir}/texture_412.png
	26
	27	# texture is corrupted during uploading to OpenGL
	28	vtexture b ${imagedir}/texture_409.png
	29
	30	set only_screen 1