mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
e3d4b87912
Added AIS_ViewController::MouseSelectionSchemes() property defining map of selection schemes for mouse+modifier combinations. IsXOR flag has been replaced by AIS_SelectionScheme in interfaces. Rubber-band selection with Shift key pressed now applies XOR selection scheme in in Draw Harness. Command vselect has been extended to specify selection scheme by name.
61 lines
1.5 KiB
Plaintext
61 lines
1.5 KiB
Plaintext
puts "============"
|
|
puts "CR26147"
|
|
puts "============"
|
|
puts ""
|
|
|
|
##########################################################################################
|
|
puts "Visualization - restore the ability to pick only fully included objects in rectangular selection"
|
|
##########################################################################################
|
|
|
|
pload VISUALIZATION MODELING
|
|
|
|
box b1 0 0 0 1 1 1
|
|
box b2 2 2 2 1 1 1
|
|
box b3 4 4 4 1 1 1
|
|
|
|
vinit View1
|
|
vdisplay b1 b2 b3
|
|
vfit
|
|
|
|
vselmode b1 1 1
|
|
vselmode b1 2 1
|
|
vselmode b2 1 1
|
|
vselmode b2 2 1
|
|
|
|
vselect 75 230 235 320 -allowoverlap 0
|
|
set aNbSelected1 [vnbselected]
|
|
if {$aNbSelected1 != 4} {
|
|
puts "ERROR: Wrong number of entities in vertice-edge selection without overlap allowed!"
|
|
}
|
|
|
|
vselect 75 230 235 320 -allowoverlap 1
|
|
vnbselected
|
|
set aNbSelected2 [vnbselected]
|
|
if {$aNbSelected2 != 11} {
|
|
puts "ERROR: Wrong number of entities in vertice-edge selection with overlap allowed!"
|
|
}
|
|
|
|
vselect 0 0
|
|
|
|
vselmode b3 4 1
|
|
|
|
vselect 75 230 235 320 -allowoverlap 0 -xor
|
|
vselect 350 150 380 170 -xor
|
|
vnbselected
|
|
set aNbSelected3 [vnbselected]
|
|
if {$aNbSelected3 != 4} {
|
|
puts "ERROR: Wrong number of entities in vertice-edge-face shift selection without overlap allowed!"
|
|
}
|
|
|
|
vselect 0 0
|
|
|
|
vselect 75 230 235 320 -allowoverlap 1 -xor
|
|
vselect 350 150 380 170 -allowOverlap 1 -xor
|
|
vnbselected
|
|
set aNbSelected4 [vnbselected]
|
|
if {$aNbSelected4 != 13} {
|
|
puts "ERROR: Wrong number of entities in vertice-edge-face shift selection with overlap allowed!"
|
|
}
|
|
|
|
vdump $imagedir/${casename}.png
|