1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-04 13:13:25 +03:00
occt/tests/bugs/vis/ger61351_3
aba 4754e16481 0023539: QASelect and QAShiftSelect commands
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
2013-01-18 14:22:14 +04:00

22 lines
367 B
Plaintext
Executable File

puts "==============="
puts " GER61351 "
puts "=================================="
puts "CASE 3 :takes visual check "
puts "=================================="
vinit
box b 10 20 30
GER61351 b RED2
vfit
set x_coord 89
set y_coord 363
checkcolor $x_coord $y_coord 0.93 0 0
if {$stat != 1} {
puts "Error : Box color is NOT RED2."
}
set only_screen 1