mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-06-05 11:24:17 +03:00
49582f9dbf
ViewerTest_EventManager now inherits AIS_ViewController. Platform-dependent user input handling within ViewerTest has been revised to process events in common way through AIS_ViewController. The mouse navigation has been changed, so that left mouse clicked without modifers now rotates View. The rubber-band selection can be activated via Alt+LeftMouseButton. Selection is now done on mouse unclick and keyboard short-cuts take effect on unclick. Aspect_Window::SetTitle() - added new method configuring Window title. Introduced new types Aspect_Touch, Aspect_VKey, Aspect_ScrollDelta for processing window events in platform-independent way.
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 1
|
|
vselect 350 150 380 170 1
|
|
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 1
|
|
vselect 350 150 380 170 -allowOverlap 1 1
|
|
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
|