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

admin

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


比较快的方法吧，直接找属性VWLETTER
+ L0 e/ D* f; z' ?  P$ _$ D& f

        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
* m0 U+ q, R" z- ?& x4 R: q+ m            Echo("Drawing: " & dwg.Name.ToString)
# y+ n  }& o- B            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
                    Echo("    " & draftingView.Name & " - " &
                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
! _' I5 Q7 R6 A- A! u3 w& l                Else
                    Echo("    " & draftingView.Name)
                End If
            Next
        Next
9 N4 C  |+ t; \$ X
2 H, o3 p3 N, A# t* r
+ j3 m6 m; a* m, T  K1 p    End Sub
5 r, I1 v' M9 Y0 f