mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-14 13:30:48 +03:00
4754e16481
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
55 lines
1018 B
Plaintext
Executable File
55 lines
1018 B
Plaintext
Executable File
if { [array get env os_type] != "" } {
|
|
set os $env(os_type)
|
|
}
|
|
if { [string compare $os "windows"] != 0 } {
|
|
puts "TODO OCC12345 ALL: An exception was caught"
|
|
puts "TODO OCC12345 ALL: \\*\\* Exception \\*\\*.*"
|
|
puts "TODO OCC12345 ALL: TEST INCOMPLETE"
|
|
}
|
|
|
|
puts "=================================="
|
|
puts "BUC60569"
|
|
puts "OCC597"
|
|
puts "=================================="
|
|
puts ""
|
|
puts "=================================="
|
|
puts "It takes visual check for this BUG"
|
|
puts "=================================="
|
|
puts ""
|
|
|
|
restore [locate_data_file buc60569a.rle] result
|
|
tclean result
|
|
vinit
|
|
|
|
checkshape result
|
|
|
|
BUC60569 result
|
|
vfit
|
|
|
|
vselect 250 190
|
|
vselect 180 350 1
|
|
vmoveto 250 190
|
|
vmoveto 180 350
|
|
vselect 390 390
|
|
|
|
set x_coord 335
|
|
set y_coord 331
|
|
|
|
checkcolor $x_coord $y_coord 1 1 0
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : The right face is NOT deSelected."
|
|
}
|
|
|
|
set x_coord 101
|
|
set y_coord 347
|
|
|
|
checkcolor $x_coord $y_coord 1 1 0
|
|
|
|
if {$stat != 1} {
|
|
puts "Error : The left face is NOT deSelected"
|
|
}
|
|
|
|
set only_screen 1
|
|
|