mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +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
40 lines
1.1 KiB
Plaintext
Executable File
40 lines
1.1 KiB
Plaintext
Executable File
puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
|
|
puts "========"
|
|
puts "OCC173"
|
|
puts "(case 3)"
|
|
puts "========"
|
|
puts ""
|
|
###########################################################
|
|
## Impossible to change the material or the transparency of the attached BREP shape.
|
|
###########################################################
|
|
|
|
restore [locate_data_file OCC173.brep] result
|
|
|
|
checkshape result
|
|
|
|
vinit
|
|
tclean result
|
|
vdisplay result
|
|
vfit
|
|
vsetdispmode result 1
|
|
|
|
set color1 [QAGetPixelColor 175 195]
|
|
regexp {RED +: +([-0-9.+eE]+)} $color1 full rd1
|
|
regexp {GREEN +: +([-0-9.+eE]+)} $color1 full gr1
|
|
regexp {BLUE +: +([-0-9.+eE]+)} $color1 full bl1
|
|
|
|
########################################################
|
|
vsettransparency result 0.5
|
|
|
|
set color2 [QAGetPixelColor 175 195]
|
|
regexp {RED +: +([-0-9.+eE]+)} $color2 full rd2
|
|
regexp {GREEN +: +([-0-9.+eE]+)} $color2 full gr2
|
|
regexp {BLUE +: +([-0-9.+eE]+)} $color2 full bl2
|
|
|
|
if { ${rd2} == ${rd1} || ${gr2} == ${gr1} || ${bl2} == ${bl1} } {
|
|
puts "Error : vsettransparency of shape was NOT made"
|
|
}
|
|
|
|
set only_screen 1
|
|
|