mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
ab1f458034
XDisplay - added new command displaying XDE document in ViewerTest map of object:
> XDisplay Doc [label1 [label2 [...]]] [-explore {on|off}] [-docPrefix {on|off}] [-names {on|off}]
> [-noupdate] [-dispMode Mode] [-highMode Mode]
vstate - added NULL checks.
vdisplay now prints error on attempt to specify unsupported display mode.
verase, vremove now raise Tcl exception on attempt to hide non-existing object.
verase, vremove, vdir now accept name masks like "verase b*".
vremove and vdir output is now consistent to verase command (space-separated list of removed objects).
39 lines
962 B
Plaintext
39 lines
962 B
Plaintext
puts "========"
|
|
puts "0025822: Visualization, TKOpenGl - front material should be used instead of back material within distinguish mode turned off"
|
|
puts "========"
|
|
|
|
pload MODELING OCAF XDE
|
|
box b 10 10 10
|
|
vclear
|
|
vinit View1
|
|
catch { Close D }
|
|
NewDocument D BinXCAF
|
|
XAddShape D b
|
|
XSetColor D b 0 0 1
|
|
explode b f
|
|
XSetColor D b_1 1 0 0
|
|
|
|
XDisplay D
|
|
vviewparams -proj 1 0.1 0.1
|
|
vfit
|
|
vsetdispmode 1
|
|
|
|
catch { vclipplane delete pln }
|
|
vclipplane create pln
|
|
vclipplane set pln view Driver1/Viewer1/View1
|
|
vclipplane change pln equation -1 0 0 5
|
|
|
|
# FFP on, pixel is RED3, which is expected
|
|
vcaps -ffp 1
|
|
set aColorFfp [vreadpixel 200 200 rgb name]
|
|
if { "$aColorFfp" != "RED3" } {
|
|
puts "Error: RED3 color is expected at the back side (FFP)"
|
|
}
|
|
|
|
# GLSL on, pixel should has the same color RED3, but actual color is KHAKI1
|
|
vcaps -ffp 0
|
|
set aColorGlsl [vreadpixel 200 200 rgb name]
|
|
if { "$aColorGlsl" != "RED3" } {
|
|
puts "Error: RED3 color is expected at the back side (GLSL)"
|
|
}
|