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

puts "============"
puts "CR26035"
puts "============"
puts ""
#######################################################################
#  Dimension drawing between two vertices
#######################################################################

vfont add [locate_data_file DejaVuSans.ttf] SansFont

vinit View1
vclear
vaxo

set x1 10
set y1 0
set z1 0

set x2 10
set y2 0
set z2 10

vertex v1 $x1 $y1 $z1
vertex v2 $x2 $y2 $z2

vdimension len -length -shapes v1 v2 -plane yoz -font SansFont

vfit

set only_screen 1
Commit	Line	Data
85a975f1	1	puts "============"
	2	puts "CR26035"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Dimension drawing between two vertices
	7	#######################################################################
	8
6fb1a930	9	vfont add [locate_data_file DejaVuSans.ttf] SansFont
6fb1a930	10
85a975f1	11	vinit View1
	12	vclear
	13	vaxo
	14
	15	set x1 10
	16	set y1 0
	17	set z1 0
	18
	19	set x2 10
	20	set y2 0
	21	set z2 10
	22
	23	vertex v1 $x1 $y1 $z1
	24	vertex v2 $x2 $y2 $z2
	25
6fb1a930	26	vdimension len -length -shapes v1 v2 -plane yoz -font SansFont
85a975f1	27
	28	vfit
	29
	30	set only_screen 1
	31