SolidWorks工程图孔表的基准原点DatumOrigin显示隐藏

SolidWorks工程图孔表的基准原点DatumOrigin显示隐藏

这是我在CSDN的第一篇文章

今天给一位做SolidWorks二次开发的人有偿写一段代码,代码很短,但费了一些时间在API帮助文件中找到语句。在孔表Hole Table的接口成员Interface MembersHoleTagsVisibleHoleCentersVisible两个逻辑变量,没有基准原点DatumOrigin的Visible显示隐藏逻辑变量。深入探索发现基准原点DatumOrigin可以通过Part.HideDimension隐藏,却没有语句显示。再深入研究才发现基准原点DatumOrigin是属于注释Annotation,而注释都可以有Visible属性,而注释的Visible值不是逻辑值,而是四个内部常数值。
从这个过程有以下几个体会:

  1. SolidWork ,有很好的开发环境;
  2. 注释Annotation这块有许多金矿可挖
    孔表HoleTable的三个显示选项
    Alt

代码

Dim swApp As Object
Dim Part As Object
Dim swSelectionMgr As SldWorks.SelectionMgr
Dim swHoleTable As SldWorks.HoleTable
Dim swDatumOrigin As SldWorks.DatumOrigin
Dim DatumOriginVisibleOpition As swAnnotationVisibilityState_e
Dim CentersVisibleOpition As Boolean
Dim TagsVisibleOpition As Boolean
Dim boolstatus As Boolean

Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc

'以下选项进行预设
DatumOriginVisibleOpition = swAnnotationVisible
'DatumOriginVisibleOpition = swAnnotationHidden
CentersVisibleOpition = True
'CentersVisibleOpition = False
TagsVisibleOpition = True
'TagsVisibleOpition = False

 Set swSelectionMgr = Part.SelectionManager
 'boolstatus = Part.Extension.SelectByID2("孔表1", "HOLETABLE", 0, 0, 0, False, 0, Nothing, 0)
 Set swHoleTable = swSelectionMgr.GetSelectedObject6(1, -1)
 With swHoleTable
 .DatumOrigin.GetAnnotation.Visible = DatumOriginVisibleOpition
 .HoleCentersVisible = CentersVisibleOpition
 .HoleTagsVisible = TagsVisibleOpition
 End With

End Sub

注释可见状态值swAnnotationVisibilityState

值Member描述DescriptionS
swAnnotationVisibilityUnknownAnnotation visibility is not known未知
swAnnotationVisibleAnnotation is visible可见
swAnnotationHalfHiddenAnnotation is half-hidden (grayed out) or hidden depending on the interactive user’s actions.半隐(灰色),取决于交互状态,不是最终状态
swAnnotationHiddenAnnotation is hidden隐藏
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值