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

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

  [复制链接]

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

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

mildcat 楼主

2013-12-2 20:33:45

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能
. o4 s( U( A* j% p( r( u9 Q  ^内容:+ J% n; s4 v  a8 V  U/ t7 n! M6 C
默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改, t6 B& T5 ?7 M. @* m& w2 k& V
目的:% K$ y2 V$ y: q, f
使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。
4 K# |; B. J5 f# H* w" ~. f3 }0 F$ U' p

20 完善JA的选择功能

20 完善JA的选择功能

5 p6 d  A& |* A

$ t( ?' s9 y1 B: A高清教程见楼下:9 Z! s( z8 D, V9 w5 q, M& Z
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject
    . X4 s" A! b/ U' c. p5 v$ }
  2. Dim  ui  As  UI  =  ui.GetUI
    6 L* o& e: W8 p3 u
  3. Dim  message  As  String  =  "Select  face"$ p, f, B$ }% O  [  f* ]( x2 s
  4. Dim  title  As  String  =  "Selection"
    ( H7 U3 h. A* e( Z! S
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _! h6 _1 E6 N$ q9 p# g+ b
  6. SelectionScope.WorkPart# J3 b( k2 `- {, d' B) t
  7. Dim  keepHighlighted  As  Boolean  =  True
    . }8 E3 M; a4 _: c, a
  8. Dim  includeFeatures  As  Boolean  =  True: [3 k. n# Q" D- e+ S* f" q
  9. Dim  response  As  Selection.Response( W$ [& k6 @! W
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    ' t1 o" j/ Z8 F- d
  11. Selection.SelectionAction.ClearAndEnableSpecific
    8 A! U2 M3 D1 C; }2 ?
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple
    8 o2 S4 @* {6 k0 Y1 D4 E- x
  13. With  selectionMask_array(0)
    1 q  a' s% I) t, D/ P3 ~" @. a
  14. .Type  =  UFConstants.UF_face_type* ]% B9 C( n& H) ]! Q
  15. .Subtype  =  0
    5 G. v& ~$ z; R! A1 @
  16. .SolidBodySubtype  =  0
    ; @: _; o! V& G5 @! q/ o
  17. End  With; M& g" m7 A) [/ w- N
  18. Dim  cursor  As  Point3d
    + c. ^" t( m6 ?$ A, f( S( @
  19. response  =  ui.SelectionManager.SelectObject(message,  _! s8 o& C5 t9 D( D! D& h
  20. title,  scope,  selectionAction,  _
    ; ^9 u( I& K, s0 @
  21. includeFeatures,  keepHighlighted,  _6 X, g7 K; s5 z1 p- u# o
  22. selectionMask_array,  selectedObject,  cursor)
    0 {/ o9 r# I9 D" ?2 r7 ?  P8 |; x" D" _
  23. If  response  =  Selection.Response.Cancel  Or  response  _  G$ W; P  }! T3 S
  24. =  Selection.Response.Back  Then5 Z7 Y+ H& k. p% s. l* e# O
  25. Return  Nothing
    " h. U  W/ y5 s* C+ Z
  26. End  If3 k5 R1 W: j* L; y
  27. End  Function& V; {, }' |. A0 |9 z: L
复制代码

* M1 l0 L  Y& k- `3 t$ g' C. p5 `
8 e, f: u8 h1 V) W* N

! g# X5 G7 f; S3 B' C
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

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

mildcat 沙发

2013-12-2 20:33:57

+ C5 _+ J4 c0 `* P0 O3 \9 \- y 9 Z; S9 \& T- k; ~ PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能9 E0 Q2 k# Z4 ^* v* [- Z4 k* ` , g, S, z" v! W% S4 y7 | [flash] $ ]4 W" K2 W% a- p" l% I [/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

* o4 P0 G6 j3 l
楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接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二次开发专题模块培训报名开始啦

    我知道了