Inventor 2014 API 新功能 (10) 根据球面中心点创建工作点

autodeskinventorapi

于 2013-05-16 09:14:50 发布

阅读量1.8k

点赞数

分类专栏：零件

本文链接：https://blog.csdn.net/autodeskinventorapi/article/details/8933281

版权

零件专栏收录该内容

39 篇文章

订阅专栏

这是2014 产品也提供的新功能，即能够根据选取的球面（无论是全球面，半球面或任意部分球面）的中心创建工作点。这在以前，用户只能获知球心坐标，手动输入。

API 提供了对应的方法: WorkPoints.AddBySphereCenterPoint 。用法很简单。

Public Sub createWPBySphere()

 Dim partDoc As PartDocument
    Set partDoc = ThisApplication.ActiveDocument
    
    Dim partDef As PartComponentDefinition
    Set partDef = partDoc.ComponentDefinition
    
    '假定某球面已选择好
    Call partDef.WorkPoints.AddBySphereCenterPoint(partDoc.SelectSet(1))
    
End Sub