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/bug11095
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

37 lines
691 B
Plaintext
Executable File

puts "============"
puts "OCC11095"
puts "============"
puts ""
#######################################################################
# MeshVS: Borders of faces are not visible in shrink mode
#######################################################################
set BugNumber OCC11095
pload XDE
meshfromstl m [locate_data_file OMF6391_box.stl]
set x_coord 157
set y_coord 280
set RED_R1 0
set GREEN_R1 0
set BLUE_R1 0
vmoveto $x_coord $y_coord
meshdispmode m 3
puts "\nSet shrinked display mode\n"
set x_coord 137
set y_coord 277
checkcolor $x_coord $y_coord 0 0 0
if { ${stat} != 1 } {
puts "Error : Borders of faces are not visible in shrink mode"
}
set only_screen 1