PLM之家PLMHome-工业软件践行者

[原创视频] PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能

  [复制链接]

2014-1-19 08:44:16 37764 125

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能
0 l& ^  |+ i$ e' D内容:
5 q( |6 h4 P; X" x  n% a% p默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改: Z, ?; W1 ]& h4 Y3 y# I8 J0 J
目的:
& ?. i0 R* l# S" ?' t使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。. `/ ?! I( D& m& _( Q) S

6 b8 E$ A! g7 _0 g& d

20 完善JA的选择功能

20 完善JA的选择功能

; u: A' Z4 D! K% m# e
& f- y9 K3 B! t# w1 t
高清教程见楼下:$ u( B# h5 k: X" j% I; M
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject- N3 ?  Q. G& W. [1 T1 @
  2. Dim  ui  As  UI  =  ui.GetUI
    6 |* \( j$ \# z) D( S
  3. Dim  message  As  String  =  "Select  face"' i9 Y- P+ \1 ~* L. H
  4. Dim  title  As  String  =  "Selection"; |& g/ E! v6 E! q' `# r
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _) r( i5 v4 t8 c4 l! H& I* w9 s, z
  6. SelectionScope.WorkPart
    . o; N; |# V; N- r
  7. Dim  keepHighlighted  As  Boolean  =  True
    ' O5 @, s6 e/ O" A+ R+ x/ k
  8. Dim  includeFeatures  As  Boolean  =  True
    6 M& C1 @# m8 j9 G6 F- o6 F
  9. Dim  response  As  Selection.Response) R) F5 z; @# K5 W+ n  \$ _
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    , ]# G9 h& c4 X: O3 s8 H& b, z. Z( ]
  11. Selection.SelectionAction.ClearAndEnableSpecific
    1 G& q$ [: ?7 H" U
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple
    $ G1 U  S2 j/ k# G1 ~
  13. With  selectionMask_array(0)+ k4 c5 r4 c: O  Q1 W- M
  14. .Type  =  UFConstants.UF_face_type
    * m% |# \5 Q% Q9 m
  15. .Subtype  =  0
    / k+ D1 g$ I0 U  m. }5 y
  16. .SolidBodySubtype  =  0& R4 w4 Z  Y- o6 E+ q  H! [  C- G
  17. End  With
    / Q- q; J0 N3 \0 [
  18. Dim  cursor  As  Point3d) z% O1 p6 n" t& g' U0 h( D
  19. response  =  ui.SelectionManager.SelectObject(message,  _
    : @/ x* {5 H1 f
  20. title,  scope,  selectionAction,  _
    ! h/ c% W( u2 H" |" @$ f
  21. includeFeatures,  keepHighlighted,  _+ {0 d7 N, k% u7 P5 U+ j$ B
  22. selectionMask_array,  selectedObject,  cursor)1 M: c5 m' Q* C; h
  23. If  response  =  Selection.Response.Cancel  Or  response  _4 e: O- R) H5 j+ o8 B$ U
  24. =  Selection.Response.Back  Then, U$ e9 I9 Y% f3 U4 B7 h$ G- S) ]
  25. Return  Nothing& m9 w/ V- w! k' A
  26. End  If7 x, v* S6 i; e, A' A% Z
  27. End  Function
    $ Y1 ~) O1 e) U0 L4 B
复制代码

$ k) r- y2 }( X, K3 D
& w, [& ]8 k; X  d

0 C+ O: i7 y6 u1 t5 B
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

mildcat 发表于 2013-12-2 20:33:57

mildcat 沙发

2013-12-2 20:33:57

, `" q1 o/ _# F/ t( ]* l! e , \3 [9 `8 Y2 `4 D2 b4 t G6 _ PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能 # s @; j7 ~4 U6 Z M' } ! ^; P' Z J& U/ X% n1 w' v% ][flash] 8 B: E+ @( v2 {3 L* n) k [/flash]
该会员没有填写今日想说内容.
回复 支持 反对

使用道具 举报

东沟恋君 发表于 2013-12-7 22:41:11

东沟恋君 板凳

2013-12-7 22:41:11

赠人玫瑰,手有余香
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

江东 发表于 2013-12-23 00:41:30

江东 地板

2013-12-23 00:41:30

一定要看看
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

逐日 发表于 2014-1-5 16:33:09

逐日 6#

2014-1-5 16:33:09

谢谢螺柱分享
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

student 发表于 2014-1-12 01:05:45

student 7#

2014-1-12 01:05:45

之持支持~~~來挖寶
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

ONE 发表于 2014-1-12 09:02:25

ONE 8#

2014-1-12 09:02:25

" U3 O# f: S& Z0 U. O. C
楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

C_X_J 发表于 2014-1-18 12:43:57

C_X_J 9#

2014-1-18 12:43:57

楼主辛苦了,谢谢分享
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

不是哥干的 发表于 2014-1-19 08:44:16

不是哥干的 10#

2014-1-19 08:44:16

谢谢高手的分享
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复 支持 反对

使用道具 举报

发表回复

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

返回列表 本版积分规则

  • 发布新帖

  • 在线客服

  • 微信

  • 客户端

  • 返回顶部

  • x
    温馨提示

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

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

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

    我知道了