mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-15 13:48:57 +08:00
Replaced QAMoveTo, QASelect and QAShiftSelect draw commands with vmoveto and vselect Moved vselect and vmoveto draw commands to ViewerTest_ViewerCommands.cxx Replaced QAMoveTo and QASelect in test cases. Corrected returned error case result in vselect and vmoveto. Added commands in ViewerTest_ViewerCommands from QADraw. Edited tests. QACommands in tests were replaced with ViewerTest commands. QAxwd command was removed from QADraw. Edited command wzoom and commands from ViewerTest. Help for ViewerTest commands was edited Small corrections. Added test cases for polygonal selection. Small correction of test cases
35 lines
935 B
Plaintext
Executable File
35 lines
935 B
Plaintext
Executable File
puts "========"
|
|
puts "OCC23652"
|
|
puts "========"
|
|
|
|
###############################################################################
|
|
# Non zoomable text with alignment slides away when zooming view
|
|
###############################################################################
|
|
|
|
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
|
|
|
|
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
|
|
set up_X -0.40824827551841736
|
|
set up_Y 0.40824827551841736
|
|
set up_Z 0.81649655103683472
|
|
set at_X 0
|
|
set at_Y 0
|
|
set at_Z 0
|
|
|
|
vviewparams ${scale} ${center_X} ${center_Y} ${proj_X} ${proj_Y} ${proj_Z} ${up_X} ${up_Y} ${up_Z} ${at_X} ${at_Y} ${at_Z}
|
|
|
|
set x_coord 36
|
|
set y_coord 201
|
|
|
|
checkcolor $x_coord $y_coord 0.6 0.6 0.6
|
|
|
|
set only_screen 1
|