mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-20 12:45:50 +03:00
60986042ab
1) Used more accurate Select3D_SensitiveTriangulation instead of Select3D_SensitiveFace for rectangular sensitives in AIS_Plane::ComputeSelection, AIS_Dimension::ComputeSelection 2) Test case for CR24564
43 lines
829 B
Plaintext
43 lines
829 B
Plaintext
puts "============"
|
|
puts "CR24564"
|
|
puts "============"
|
|
puts ""
|
|
|
|
#######################################################################
|
|
# Test for sensitivity of box located over AIS_Plane
|
|
#######################################################################
|
|
|
|
set aV "Driver1/Viewer1/View1"
|
|
vinit name=$aV l=32 t=32 w=400 h=400
|
|
vactivate $aV
|
|
vclear
|
|
|
|
puts "Testing box selection over the plane in orthogonal projection:"
|
|
vpoint p1 0 0 0
|
|
vpoint p2 1 0 0
|
|
vpoint p3 0 1 0
|
|
|
|
vplane pl1 p1 p2 p3 0
|
|
box b 50 50 50
|
|
vdisplay b
|
|
vfit
|
|
vtop
|
|
|
|
vmoveto 199 200
|
|
checkcolor 199 200 0 1 1
|
|
|
|
if { $stat != 1 } {
|
|
puts "Error : The box is not selectable!"
|
|
}
|
|
|
|
puts "Testing box selection over the plane in axonometry projection:"
|
|
vaxo
|
|
vfit
|
|
|
|
vmoveto 199 200
|
|
checkcolor 199 200 0 1 1
|
|
|
|
if { $stat != 1 } {
|
|
puts "Error : The box is not selectable!"
|
|
}
|