1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/tests/bugs/vis/buc60587
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

31 lines
509 B
Plaintext
Executable File

puts "========="
puts "BUC60587"
puts "========="
puts ""
puts "=================================="
puts "It takes visual check for this BUG"
puts "=================================="
restore [locate_data_file buc60587a.brep] result
checkshape result
tclean result
vinit
vdisplay result
vfit
vsetdispmode 1
vselect 180 180
vsetcolor result CYAN3
set x_coord 120
set y_coord 180
checkcolor $x_coord $y_coord 0.7 1 0.9
if { $stat != 1 } {
puts "Error : Model has NOT CYAN colour."
}
set only_screen 1