0022785: Draw Harness - add possibility to remove a text drawn by the command vdrawtext
[occt.git] / tests / 3rdparty / fonts / A3
index e438cff..f5edea0 100644 (file)
@@ -6,7 +6,7 @@ puts ""
 
 vtrihedron trihedr
 
-set aFileHandle [open "$::env(CASROOT)/data/step/screw.step" r]
+set aFileHandle [open [locate_data_file screw.step] r]
 set aText [read $aFileHandle]
 close $aFileHandle
 
@@ -15,6 +15,6 @@ vpoint p1     0  10000 -400
 vpoint p2  1000      0 -400
 vfit
 
-vdrawtext "$aText"  100  100 -400 000 255 255 0 0 000 1 50 1 Times-Roman
+vdrawtext text "$aText"  -pos 100  100 -400 -color 0.0 1.0 1.0 -halign left -valign bottom -angle 000 -zoom 1 -height 50 -aspect regular -font Times-Roman
 
 vfps