vba catia v5 R24 kenarların başlangıç ​​ve bitiş noktası

Question

Catia ve vba programlamada yeniyim.

Durma noktalarını hesaplamak için uçtan uç uç noktaları başlatmayı denedim.

RectilinearTriDimFeatEdge için kolay, uç noktanın origin + length * direction tarafından hesaplanabildiği bir GetOrigin ve GetDirection yöntemi sağlar. Ancak BiDimFeatEdge gibi diğer türler için başlangıç ​​noktasını bile alamıyorum.

Her tür kenardan başlangıç ​​ve bitiş noktaları elde etmenin bir yolu var mı? Teşekkürler

Answer 1

Açık eğriler için, eğrinin her iki tarafındaki noktayı, iCurve girişiniz olduğu ve iBeginEnd'in istediğiniz tarafa geçtiği şekilde bu şekilde işlevlendirebilirsiniz.

Private Function endPoint(iCurve As Reference, Optional iBeginEnd As Boolean = False) As HybridShapePointOnCurve 
    Set endPoint = CATIA.ActiveDocument.Part.HybridShapeFactory.AddNewPointOnCurveFromDistance(iCurve, 0#, iBeginEnd) 
End Function 

veya istenilen yönde ekstremum kullanabilirsiniz

onlar

başlangıç ​​ve bitiş noktaları, ancak bu çözüm gerekiyorsa, sormak .. yok gibi kapalı eğriler için elbette bu alışkanlık iş

Sadece bir nesnenin lengtini almak istiyorsanız, daha basit bir ölçüm yöntemi vardır.