|
|
请使用QQ关联注册PLM之家，学习更多关于内容，更多精彩原创视频供你学习！
您需要 登录 才可以下载或查看，没有账号？注册
x
' r* k( k# t7 A. s- [1 f: E
NX二次开发源码分享： 创建视图到指定方向- E. C; S- u' b/ h& M1 [
7 V& I. B/ p% Y) P& Z
[mw_shl_code=c,true]Imports System$ c. z$ b9 g- B! `: s
Imports NXOpen- m! l( y. r; ^" Y, W4 o
1 R3 J& N9 [: C$ P* L
Module TrimetricViewFromBelow
% P& I( v9 ]$ w! J/ s* ?' ^7 O& |1 o( _ Z2 d$ q9 ?. H
Sub Main (ByVal args() As String) ! ~( L* M( W2 r; O$ X
5 @: G5 I1 B0 [/ M+ V# q2 e w( E
Dim theSession As Session = Session.GetSession()4 z1 A' P1 D' D: T
Dim basePrt As BasePart = theSession.Parts.BaseWork
& B/ B3 L1 N# W9 J Dim workPart As CAE.CaePart = Nothing
. w, Z: L9 a9 u% U
g. B: y. L' [. d4 _+ Q Dim origin1 As Point3d = Nothing
/ K2 O# L- Y/ x: f, ? Dim vector1 As Vector3d = Nothing
4 l1 E3 K0 a% \7 [; F; a
$ r9 F2 C8 r6 ?: O% P1 @8 H- N! [2 b Dim Xx As Double = 0.63121905864762995 ' 50.86 deg- \) t! \# |1 q3 e1 F
Dim Xy As Double = 0.77560460287442845 ' 39.14 deg9 ~/ |. Z8 r) a Q
Dim Xz As Double = 0.04 Z' q' C. T! K
Dim angle As Double = -44.0 h- A! _& t: y0 G
* T; q# \! b7 D8 }( B/ A: X If (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.FemPart)) Then5 o" R5 K: u+ i! x; O% J
workPart = CType(theSession.Parts.BaseWork, CAE.SimPart)
* h% }& I3 J/ h6 Y { ElseIf (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.SimPart)) Then
7 c* r$ a& S% |/ Z+ H. `' y workPart = CType(theSession.Parts.BaseWork, CAE.FemPart)
- p! W, O! l6 ~5 j End If! b5 j) H- o/ `) |% O; A
) s5 j7 |8 d1 V* | workPart.ModelingViews.WorkView.Orient(View.Canned.Trimetric, _
* W$ u: p" N- i& F$ T# I. o1 ] View.ScaleAdjustment.Fit)
! g: s0 J5 ^: J& d' \5 [8 G- o5 H Q" U$ b7 y; x2 z0 M
origin1 = workPart.ModelingViews.WorkView.AbsoluteOrigin
# [+ M* o0 i5 {( L, S8 Q2 ?/ W
4 @% M2 ?% Y, H3 h8 ~$ c vector1 = New Vector3d(Xx, Xy, Xz)
9 y9 k4 K, W. l$ n" j* j& k' Y+ y 6 N# D8 B, W( i, r% Z% S4 h
workPart.ModelingViews.WorkView.Rotate(origin1, vector1, angle)
9 _' z# W( {+ P: H& l7 g, F. z# {; p' v) G8 E
workPart.ModelingViews.WorkView.Fit()
/ r' m4 w! N J. y9 W9 B b& n" \( g
End Sub0 J; y+ U& K; T- d. c
1 n7 g" y1 A) W" q+ L; c
End Module
: Z8 x3 \0 ~* s0 w [. N' negative trimetric view[/mw_shl_code]- x$ ?/ `0 L3 D1 n* E: a/ X
|
|
|小黑屋|手机版|PLM之家-企业数智化转型工业软件学习平台
