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

admin

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

0 u; e  x- z5 }
3 [$ _4 k% q5 ^6 o' n. U比较快的方法吧，直接找属性VWLETTER
$ B- D  y+ }9 z/ v" O- y

! {( p' H7 b+ e; b        For Each dwg As Drawings.DrawingSheet In theSession.Parts.Display.DrawingSheets
2 S" `8 I3 ^4 b6 `& e! ^4 K/ P            Echo("Drawing: " & dwg.Name.ToString)
2 f6 Z' e$ Y( [4 `9 v            For Each draftingView As Drawings.DraftingView In dwg.GetDraftingViews()
- T) x7 |$ H1 x- Q6 w. {1 H                If draftingView.HasUserAttribute("VWLETTER", NXObject.AttributeType.String, -1) Then
                    Echo("    " & draftingView.Name & " - " &
; t) ~& V$ }+ K: S# J# i                         draftingView.GetUserAttributeAsString("VWLETTER", NXObject.AttributeType.String, -1))
2 J" m3 C# |" k9 M0 G                Else
                    Echo("    " & draftingView.Name)
+ }) v6 {& `0 D8 k& Y                End If
& C8 e* U9 J2 ?, r/ B& i            Next
        Next

% N% J" Q8 h, i) q
    End Sub
! f  ~4 M# Z* H3 y