mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
37 lines
933 B
Plaintext
Executable File
37 lines
933 B
Plaintext
Executable File
puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
|
|
puts "========"
|
|
puts "OCC173"
|
|
puts "(case 2)"
|
|
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 [vreadpixel 175 195 rgb]
|
|
set rd1 [lindex $color1 0]
|
|
set gr1 [lindex $color1 1]
|
|
set bl1 [lindex $color1 2]
|
|
|
|
vsetmaterial result ALUMINIUM
|
|
|
|
set color2 [vreadpixel 175 195 rgb]
|
|
set rd2 [lindex $color2 0]
|
|
set gr2 [lindex $color2 1]
|
|
set bl2 [lindex $color2 2]
|
|
|
|
if { ${rd2} == ${rd1} || ${gr2} == ${gr1} || ${bl2} == ${bl1} } {
|
|
puts "Error : material of the shape was NOT changed"
|
|
}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|