NX二次开发源码分享： 快速获取显示部件下所有的视图

admin

NX二次开发源码分享： 快速获取显示部件下所有的视图


比较快的方法吧，直接找属性VWLETTER

$ ~. y) \/ Y/ t! v$ k# I# B
        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
7 i/ T: n( M& k/ g7 b            Echo("Drawing: " & dwg.Name.ToString)
# y" H2 ~% @. ?) G! x8 ?4 z9 h- w            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
1 t2 N) U+ }9 p3 g3 H/ W8 f2 j$ K                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
5 h: w0 Y. m4 }  x  \4 u                    Echo("    " & draftingView.Name & " - " &
( F' S- X( n( b# q                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
# o( X3 v  p. m# ^% v                Else
                    Echo("    " & draftingView.Name)
                End If
            Next
' ~$ W3 b9 M1 G5 M        Next

7 g- T9 d) I% |, K! \( e
    End Sub
: M4 a- {7 L! z! O  K
7 C9 y  N2 `. B, v* }- i