mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-30 13:05:50 +03:00
352ffd7358
Test case tests/bugs/modalg/dxf906 was renamed to bug889 Adding test cases to tests/bugs/moddata Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx Modified test case bugs vis buc60738 Added test cases to modalg and moddata Added test cases to caf and fclasses Added test cases to group heal
41 lines
1.1 KiB
Plaintext
Executable File
41 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
|
|
|
|
QAUpdateLights
|
|
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
|
|
|