|
|
请使用QQ关联注册PLM之家，学习更多关于内容，更多精彩原创视频供你学习！
您需要 登录 才可以下载或查看，没有账号？注册
x
8 T+ f& D) v% J* z0 ~) R
NX二次开发源码分享： 创建视图到指定方向
5 e) {& W9 p; V/ ]
8 V8 |' a) f! w% s/ @' P) Q `, }[mw_shl_code=c,true]Imports System" d6 G" U l }. M4 I3 |( z
Imports NXOpen
% U$ E v' v& M. i6 b# W
; K7 V# E N) o' H# |Module TrimetricViewFromBelow: p: f6 ]" X7 C. v: b9 z$ B
+ V9 O% e2 a) _" I2 _9 h9 Y0 e* h Sub Main (ByVal args() As String)
, H. a1 t$ Q+ N" c b6 B
1 L/ V4 C8 M. C. Y' f Dim theSession As Session = Session.GetSession()
. H6 e& h5 I, I9 T7 { Dim basePrt As BasePart = theSession.Parts.BaseWork
: O/ ^% _0 e* T. E5 k Dim workPart As CAE.CaePart = Nothing Q2 d' p7 K7 P$ _1 u3 c7 t3 V
' h! v. p1 O4 t
Dim origin1 As Point3d = Nothing
% h+ J' R8 t b- G+ E Dim vector1 As Vector3d = Nothing, W0 M+ d: \! G' _
0 V8 R$ Z \! i) e& k& K
Dim Xx As Double = 0.63121905864762995 ' 50.86 deg! d) @8 W- r; y! g2 i( }
Dim Xy As Double = 0.77560460287442845 ' 39.14 deg
$ V7 q9 o( V+ [% U+ p Dim Xz As Double = 0.0
3 J, j8 ?& l5 C7 V7 y& y Dim angle As Double = -44.0
0 C7 B5 t F0 j% j
: ^' Z3 T. L, ]5 Y8 w6 h If (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.FemPart)) Then6 N1 `# y0 w2 ~- _( c
workPart = CType(theSession.Parts.BaseWork, CAE.SimPart)
' Y! y1 Z0 B# p) T0 ?# h ElseIf (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.SimPart)) Then1 _4 z+ L2 y) _" q7 b( i
workPart = CType(theSession.Parts.BaseWork, CAE.FemPart)
# ^4 I6 V) S* c* g% \3 n9 S- i C6 G$ g% x End If
7 r/ B- r/ ?, W! P6 v5 L1 r% C
1 s& |0 q& |. ^& I0 Y. y4 b& R workPart.ModelingViews.WorkView.Orient(View.Canned.Trimetric, _
* q6 {$ f6 f. t4 r, ^ View.ScaleAdjustment.Fit)- y) F3 |# L' {4 m! Y! C
- V) W! j! m6 b7 R/ F origin1 = workPart.ModelingViews.WorkView.AbsoluteOrigin$ ~/ h* a, |9 z& p# \2 e
8 I- i' ~& p3 p3 Y" u- H0 r vector1 = New Vector3d(Xx, Xy, Xz)
6 S" J" ~" K$ O- D+ X ) t3 |5 V# |! J7 Y
workPart.ModelingViews.WorkView.Rotate(origin1, vector1, angle)
& ?5 D- p# ?2 {9 i) w$ n9 Y Q( P3 S/ {( H s# B% }
workPart.ModelingViews.WorkView.Fit()
$ E. x T" N2 ^; r% F7 Q, b
* B& S; f' |9 n" R( d6 {3 h K5 M End Sub
$ Z' I' h* t/ B- L* e. M7 U8 c5 D/ _
End Module
$ D+ K' ]* h! t9 \5 A9 ]' negative trimetric view[/mw_shl_code]
/ h; Q1 \( z- v( h$ n6 L6 i |
|
|小黑屋|手机版|PLM之家-企业数智化转型工业软件学习平台
