[Inventor]
Inventor工程图尺寸标注文字怎么一次性全部居中
Q:这是检索的尺寸,怎么一次性全部居中所有的线性尺寸?现在都是一个一个手动拖动,很是麻烦。
A:UI 上没有办法可以做到。 但是用iLogic可以简单的实现。(帮助中有范例。)
工程图中新建iLogic规则,然后粘贴下列代码。可实现激活sheet下所有长度尺寸和角度尺寸的文字居中。
复制以下代码:
- Dim oDoc As DrawingDocument
- oDoc = ThisApplication.ActiveDocument
- Dim oSheet As Sheet
- oSheet = oDoc.ActiveSheet
- Dim oDrawingDim As DrawingDimension
- For Each oDrawingDim In oSheet.DrawingDimensions
- If TypeOf oDrawingDim Is LinearGeneralDimension Or _
- TypeOf oDrawingDim Is AngularGeneralDimension Then
- Call oDrawingDim.CenterText
- End If
- Next
复制代码 设置事件触发器,当文件保存前触发规则运行就可以了
|
|
|
|
|