5 #######################################################################
6 # Development of improvement of dimensions implementation
8 #######################################################################
11 vfont add [locate_data_file DejaVuSans.ttf] SansFont
17 vcircle circle1 diamP1 diamP2 diamP3 0
18 verase diamP1 diamP2 diamP3
19 vdimension dim1 -diameter -shapes circle1 -font SansFont
26 checkcolor $x_coord $y_coord 0 1 1
29 puts "Error : Highlighting of diameter dimension with 2d text is wrong."
33 vcircle circle2 diamP1 diamP2 diamP3 0
34 vdimension dim2 -diameter -text 3d -shapes circle2 -font SansFont
41 checkcolor $x_coord $y_coord 0 1 1
44 puts "Error : Highlighting of diameter dimension with 3d text is wrong."
47 checkview -screenshot -3d -path ${imagedir}/${test_image}.png