mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
7aaed2ce3b
Select3D_SensitiveCircle now inherits directly from Select3D_SensitiveEntity.
The sensitive circle sector is created using the Select3D_SensitivePoly class directly.
Added appropriate methods for selecting sensitive circles.
Added parameter myIsHollow to Select3D_SensitiveCylinder class.
It allows you to search for intersections with cylinders without covers.
The Draw vcircle command has been extended with UStart and UEnd parameters
to create a sector of a circle.
Added tests: vselect/cone_cylinder/circle_sector
vselect/cone_cylinder/circle_wire
vselect/cone_cylinder/filled_circle
vselect/cone_cylinder/transformed
vselect/cone_cylinder/hollow_cone_cyl
43 lines
954 B
Plaintext
43 lines
954 B
Plaintext
puts "============"
|
|
puts "OCC27477: Visualization - Select3D_SensitiveCircle always return infinite depth value in boundary mode"
|
|
puts "============"
|
|
puts ""
|
|
|
|
proc check_output {theInfo} {
|
|
set aSize [llength $theInfo]
|
|
for {set i 0} {$i < $aSize} {incr i} {
|
|
if {[string equal [lindex $theInfo $i] "Depth:"]} {
|
|
set aDepth [lindex $theInfo [expr $i + 1]]
|
|
if {[string equal $aDepth "17.4833"]} {
|
|
return 1
|
|
} else {
|
|
return $aDepth
|
|
}
|
|
}
|
|
}
|
|
|
|
return 0
|
|
}
|
|
|
|
pload VISUALIZATION
|
|
|
|
vinit View1
|
|
vpoint radP1 0 0 0
|
|
vpoint radP2 50 50 0
|
|
vpoint radP3 100 0 0
|
|
vcircle circle radP1 radP2 radP3 0
|
|
vfit
|
|
|
|
vmoveto 177 285
|
|
set anOut [split [vstate -entities] "\n"]
|
|
set anInfo [split [lindex $anOut 1] " "]
|
|
set aResult [check_output $anInfo]
|
|
if {$aResult == 1} {
|
|
puts "OK"
|
|
} else {
|
|
puts "ERROR: the depth value is incorrect: should be 17.4833, but is equal to:"
|
|
puts $aResult
|
|
}
|
|
|
|
vdump ${imagedir}/${casename}.png
|