PLM之家PLMHome-工业软件与AI结合践行者

[资料] NX二次开发源码分享: 创建视图到指定方向

[复制链接]

2018-3-24 09:25:27 2184 0

admin 发表于 2018-3-24 09:25:27 |阅读模式

admin 楼主

2018-3-24 09:25:27

请使用QQ关联注册PLM之家,学习更多关于内容,更多精彩原创视频供你学习!

您需要 登录 才可以下载或查看,没有账号?注册

x
( ]9 {' H* ^5 d! ]& N
NX二次开发源码分享: 创建视图到指定方向: X% a9 k0 i1 ?' e9 u+ G
, N6 U. h7 W, n. R
[mw_shl_code=c,true]Imports System
( F: V6 D  m; j* Q: V" iImports NXOpen
  q2 b! }. k) {2 n% C
% c" e/ {3 m& }6 j2 p8 {Module TrimetricViewFromBelow5 ^! W2 b+ j# {6 h2 `  M  Q( i5 R  O

: {+ d& l8 b8 d$ V1 c- G/ s    Sub Main (ByVal args() As String) , Z& L) T/ M9 T+ _) r$ i9 x* ~& E2 ?

4 p) a4 f+ U, ^6 X+ {        Dim theSession As Session = Session.GetSession()
7 @% q6 K6 ~, ]        Dim basePrt As BasePart = theSession.Parts.BaseWork& O8 m9 K# x4 D
        Dim workPart As CAE.CaePart = Nothing! d  P# g6 C- Y4 b' D

' G, _+ \; w; }$ l$ k        Dim origin1 As Point3d = Nothing' M) W, k5 |6 ^0 }: N
        Dim vector1 As Vector3d = Nothing
! Z+ ]1 K1 S( z3 ]* {+ l6 D" u8 u! [. f9 H
        Dim Xx As Double = 0.63121905864762995  ' 50.86 deg
) B1 P( j: `& F* Z/ V( {+ A$ a        Dim Xy As Double = 0.77560460287442845  ' 39.14 deg) A; M, F4 [' j
        Dim Xz As Double = 0.0
& J: R; z9 ^/ q' Z        Dim angle As Double = -44.0
$ y. v' \  T% n& Z
- n7 ]4 H3 f& s0 C; X        If (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.FemPart)) Then
) R1 {. R: I/ b- q' }9 L- N            workPart = CType(theSession.Parts.BaseWork, CAE.SimPart)% n8 T  ^0 V& w/ e( @# f
        ElseIf (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.SimPart)) Then" N  `! R1 ]: p7 v% @0 h# s7 O
            workPart = CType(theSession.Parts.BaseWork, CAE.FemPart)% O$ N; ?( W' `
        End If: Y* h8 i1 A7 V( F

; E$ B$ r: _  \" s$ Y        workPart.ModelingViews.WorkView.Orient(View.Canned.Trimetric, _
- q/ Z; ]' w1 H                                               View.ScaleAdjustment.Fit)) s: {# o; k6 i( o. C$ ]
/ h9 U, {/ L  h* t
        origin1 = workPart.ModelingViews.WorkView.AbsoluteOrigin
0 w+ n& ^' h6 L$ q# Z0 d    4 S" g' K! w  j8 A  d
        vector1 = New Vector3d(Xx, Xy, Xz)
' c  ?" A. A$ \. U4 A   
+ `4 M$ e. u. i, B, Q7 J        workPart.ModelingViews.WorkView.Rotate(origin1, vector1, angle)* ?0 G6 l& _7 h3 j1 Y3 H; B
. T, Y. a1 u/ @* B; V) V* ^
        workPart.ModelingViews.WorkView.Fit()
( Q4 Y, h; |. f  [; M2 r8 Q$ N+ h! y! j; U
    End Sub
" j- c1 X$ R( t9 r: ?: j# ^5 j; r9 Z" ~$ z! E
End Module
3 w, w* w1 e) w9 r1 I' negative trimetric view[/mw_shl_code]
' r6 P( Z+ [% S# n+ E/ ]3 g
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 doTeam.tech
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 注册

返回列表 本版积分规则

  • 发布新帖

  • 在线客服

  • 微信

  • 客户端

  • 返回顶部

  • x
    温馨提示

    本网站(plmhome.com)为PLM之家工业软件学习官网站

    展示的视频材料全部免费,需要高清和特殊技术支持请联系 QQ: 939801026

    PLM之家NX CAM二次开发专题模块培训报名开始啦

    我知道了