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

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

  [复制链接]

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

mildcat 发表于 2013-12-2 20:33:45 |阅读模式

mildcat 楼主

2013-12-2 20:33:45

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能4 K% k  P5 C9 j" {1 g* n7 M) j
内容:) q0 F  K+ V& q$ n. t5 M; d
默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改
2 @. K- S. Q& o  l目的:* c4 ]0 L. P. _) I- e  _
使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。( M# L  g2 M6 A" f! \* f/ H
7 ^" C3 W% r) l/ p

20 完善JA的选择功能

20 完善JA的选择功能

! ^1 m3 Q8 P7 d; l* ?

: z+ o1 _5 \/ ~高清教程见楼下:4 A1 y" }, p5 q- b/ l6 l+ m, a
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject, \% P: y  Z% E# j# k
  2. Dim  ui  As  UI  =  ui.GetUI; h) b- T9 ^3 p( I6 a+ L3 I
  3. Dim  message  As  String  =  "Select  face"/ B6 a  Q  G- Q8 ?# `  g
  4. Dim  title  As  String  =  "Selection"
    3 B. R. n5 H% [& B: v
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _$ s% w8 s+ k; G: {8 n8 r$ U  x4 M3 n
  6. SelectionScope.WorkPart  h# Z- B2 ?' ?% n
  7. Dim  keepHighlighted  As  Boolean  =  True4 b- J- g+ L- }$ a
  8. Dim  includeFeatures  As  Boolean  =  True
      l# ]$ J2 G" G  ?  d+ [
  9. Dim  response  As  Selection.Response
    4 K, i) M8 t; E" x
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    # B, q; V  ]7 c. G. F, F
  11. Selection.SelectionAction.ClearAndEnableSpecific
    2 z  C) `* \/ K/ l
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple$ W1 ~/ u4 b2 V% Q) z
  13. With  selectionMask_array(0)$ Z7 }, m' G! D0 I$ q: @7 g# ]3 A
  14. .Type  =  UFConstants.UF_face_type( i2 W  [7 W4 P6 E0 c
  15. .Subtype  =  0% _3 i0 ?; S$ h5 v* ^$ p5 G
  16. .SolidBodySubtype  =  0
    : e# S) s5 v7 D, J6 T9 F1 V1 M9 Q6 S
  17. End  With4 B: w6 l4 H9 R+ i. v
  18. Dim  cursor  As  Point3d0 R, P) V3 [6 @( \  m
  19. response  =  ui.SelectionManager.SelectObject(message,  _. R; s; b# J, g1 x5 o, D; ~
  20. title,  scope,  selectionAction,  _( G& v0 ~! c3 J% _0 @
  21. includeFeatures,  keepHighlighted,  _5 \2 w8 h' {4 f8 j
  22. selectionMask_array,  selectedObject,  cursor)
    4 C4 ^& V3 r2 f7 O$ t  `; {
  23. If  response  =  Selection.Response.Cancel  Or  response  _
    2 g4 o4 n- w, g) I5 \5 p
  24. =  Selection.Response.Back  Then
    . _$ R9 Z) q2 d' o# K% Z, x
  25. Return  Nothing3 q' J6 X1 _, Y- y. R. t2 L
  26. End  If! I5 f7 p; h0 @. G! R' G, H
  27. End  Function
    6 \6 x8 @9 \- U( x5 u2 L1 w" P# A
复制代码

- t$ T* E3 u- Y* h' T
; `% [8 A0 D# {! ^! D# W* f6 @  d

( N3 T8 X! C9 W' F5 g8 m* c. T
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

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

mildcat 沙发

2013-12-2 20:33:57

- |8 |8 R2 E2 d& m4 G. `: G 7 X9 Q* G) q1 c6 |. @ PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能 0 [4 V( e0 _& U3 u1 b; S1 x* _; ~0 b/ C3 C4 O, K [flash] ( E/ j& e; Z2 E4 A4 k6 p [/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

! q& N6 q) r/ p8 ?' V( l2 y
楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接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二次开发专题模块培训报名开始啦

    我知道了