mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
f9f740d6b0
OpenGl_Workspace::BufferDump() now implicitly converts RGBA dump into requested BGR, BGRA and RGB image. DRAW command dversion is improved to report OpenGL variant used (desktop or ES); reporting of version of MSVC is corrected for VC14 and above; reporting of HAVE_OPENCL option is removed. Usage of command vdump is corrected in some tests to specify extension .png for an image file. Compiler warning is eliminated in OpenGl_Text.cxx (OpenGL ES mode only).
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 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
|