0022785: Draw Harness - add possibility to remove a text drawn by the command vdrawtext
[occt.git] / tests / bugs / vis / bug23652
index 7c63821..90334fe 100755 (executable)
@@ -8,12 +8,10 @@ puts "========"
 
 vinit
 vtrihedron tri
-vdrawtext Default 0.0 0.0 0.0 255 255 255 0 0 0 1 20 0
-vdrawtext Right_Align 0.0 0.0 0.0 255 255 255 2 0 0 1 20 0
+vdrawtext text0 Default -pos 0.0 0.0 0.0 -color 1.0 1.0 1.0 -halign left -valign bottom -angle 0 -zoom 1 -height 20 -aspect regular
+vdrawtext text1 Right_Align -pos 0.0 0.0 0.0 -color 1.0 1.0 1.0 -halign right -valign bottom -angle 0 -zoom 1 -height 20 -aspect regular
 
 set scale    3.1783114563761763
-set center_X 0
-set center_Y 0
 set proj_X   0.57735025882720947
 set proj_Y   -0.57735025882720947
 set proj_Z   0.57735025882720947
@@ -24,13 +22,11 @@ set at_X     0
 set at_Y     0
 set at_Z     0
 
-QASetViewCharac ${scale} ${center_X} ${center_Y} ${proj_X} ${proj_Y} ${proj_Z} ${up_X} ${up_Y} ${up_Z} ${at_X} ${at_Y} ${at_Z}
+vviewparams -scale ${scale} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
 
-set x_coord 36
-set y_coord 201
+set x_coord 210
+set y_coord 204
 
 checkcolor $x_coord $y_coord 0.6 0.6 0.6
 
 set only_screen 1
-
-