2 puts "0030695: Visualization - selection by box should use clipping planes set for viewer"
26 # apply selection with rectangle covering all visualized objects
27 vselect 40 100 370 300
28 if {[vnbselected] != 4} {
29 puts "ERROR: Initial objects are not selected!"
33 vclipplane set pln view Driver1/Viewer1/View1
34 # use clippling plane to have two objects visible (the second object is partially visible)
35 vclipplane change pln equation -1 0 0 5
37 # apply inital selection rectangle, expecting selection of only fully visible object
38 vselect 40 100 370 300
39 if {[vnbselected] != 1} {
40 puts "ERROR: Bad numer of selected objects after clippling plane set on view!"
43 # apply inital selection rectangle, expecting selection of partially included object also
44 vselect 40 100 370 300 -allowoverlap 1
45 if {[vnbselected] != 2} {
46 puts "ERROR: Bad numer of selected objects after clippling plane set on view with allow overlap selection!"