Catia V5宏访问几何集内的轴系统

时间:2017-04-19 13:02:52

标签: vba catia

enter image description here

使用Catia V5宏我想将几何图形集内的轴系统和其他几何元素保存到txt文件中。我能够访问几何元素,如点和线,但不能访问轴系统(图中所示)。

'Procedure to access the geometic elements inside a geometric set    
Dim prtDoc  As Part
Dim hbds As HybridBodies
Dim hbs As HybridShapes
Set hbs = hbds.GetItem(objSel.Item2(1).Value.Name).HybridShapes

访问几何元素并获取其类型

MsgBox TypeName(hbs.Item(i))

但是如何访问轴系统?

1 个答案:

答案 0 :(得分:2)

通过CATIA API循环访问子项,无法在几何图形集中找到轴系统。 hybridBody(几何图形集)仅包含HybridShapesHybridBodiesSketches

您可以看到LinesPoints和其他类似项目,因为它们都是HybridShapes

据我所知,在几何图形集中获取Axis System对象的唯一方法是通过Selection.Search方法。

假设您的选择中有CSYS几何图形集,则可以执行以下操作:

Dim Selection as INFITF.Selection
Dim AxisSystem as INFITF.AxisSystem
'Initialize Selection and other code here
Selection.Search("'Part Design'.'Axis System';sel")
for i = 1 to Selection.Count2
    set AxisSystem = Selection.Item2(i).Value
    '...
Next