1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-07-20 12:45:50 +03:00
occt/tests/bugs/vis/bug23670_1
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

38 lines
912 B
Plaintext

puts "============"
puts "OCC23670"
puts "============"
puts ""
############################################################################
# Support for multiple 3D views
############################################################################
#test case for vinit and vactivate commands
#create view with default name Driver1/Viewer1/View1
vinit
vinit MyDriver/MyViewer/View1
vinit MyDriver/MyViewer/MyView
vactivate Driver1/Viewer1/View1
box a 10 10 10
vdisplay a
vfit
vactivate MyDriver/MyViewer/MyView
#activate MyDriver/MyViewer/View1
vactivate View1
box b 5 5 5 10 10 10
vdisplay a b
vfit
#disactivate active view
vactivate none
vactivate Driver1/Viewer1/View1
vsetdispmode 1
set x_coord 205
set y_coord 180
checkcolor $x_coord $y_coord 1 0.87 0.15
vactivate MyDriver/MyViewer/MyView
vsetdispmode 1
checkcolor $x_coord $y_coord 0 0 0
checkview -screenshot -3d -path ${imagedir}/${test_image}.png