PLM之家PLMHome-国产软件践行者

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

  [复制链接]

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

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

mildcat 楼主

2013-12-2 20:33:45

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能
, f' V  u- Q+ Q内容:
) p) B, b6 F# Y4 o8 c6 m  ^默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改+ f1 l) X. o$ l/ F9 g8 S
目的:
" [4 H4 ?7 A# ^4 ^9 D; J使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。8 t7 t2 t' a  B- |1 B+ h, M& `& x
, A3 X& l* k+ |, Z# {

20 完善JA的选择功能

20 完善JA的选择功能
; w: W/ m8 K  l+ D% q+ y
" R; }1 ~+ z: R! h
高清教程见楼下:
1 [/ r, ^& P+ S* n* N2 w* E) Q" Z
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject, M: \3 j/ I% L, ]+ G
  2. Dim  ui  As  UI  =  ui.GetUI& z! G+ e9 W3 i) W6 A8 `) w
  3. Dim  message  As  String  =  "Select  face"
    7 m7 H3 V9 ?4 M( Z
  4. Dim  title  As  String  =  "Selection"
    2 o7 W! p" j# O7 h7 ]  e3 `
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _5 i! w, O) m7 [6 c$ |
  6. SelectionScope.WorkPart8 x8 M  w: L' v/ P7 I0 J
  7. Dim  keepHighlighted  As  Boolean  =  True
    4 [3 i) f2 P% C+ x, ]7 ~1 i" k* W
  8. Dim  includeFeatures  As  Boolean  =  True6 N# a' `% V8 S
  9. Dim  response  As  Selection.Response
    $ r- R. W8 l& Q0 [9 L" |
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    : j5 G( v7 R( ~$ u, R
  11. Selection.SelectionAction.ClearAndEnableSpecific0 H9 a+ j7 l) c( O/ j. L
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple8 I: z% Z" v4 ^2 r& t
  13. With  selectionMask_array(0)) C, p$ e$ o4 v) t+ R: T
  14. .Type  =  UFConstants.UF_face_type9 h9 p  b% q# ~7 X9 h2 q  ~3 M8 z
  15. .Subtype  =  07 r* V5 I& J2 C& p/ D5 q) _
  16. .SolidBodySubtype  =  0
    ; q- \! f' H& |- h! s" `
  17. End  With% y) x% f3 Q* R) H5 N) }
  18. Dim  cursor  As  Point3d9 }- M/ Y& b" s6 H2 X
  19. response  =  ui.SelectionManager.SelectObject(message,  _
    5 s; i/ H  q  Q+ _& q
  20. title,  scope,  selectionAction,  _+ T0 |. N& Z6 N% ?
  21. includeFeatures,  keepHighlighted,  _8 q! b, U* n6 o  t
  22. selectionMask_array,  selectedObject,  cursor)
    , N8 \% x( O: s5 N: j. s, Z
  23. If  response  =  Selection.Response.Cancel  Or  response  _$ D4 E9 I) l" J; A0 D7 g+ V
  24. =  Selection.Response.Back  Then
    : Y$ \8 o6 g) S. b* H' N
  25. Return  Nothing. A0 f2 s  V7 l" g- E  \* X; L
  26. End  If, B0 o" x* {7 ~- }
  27. End  Function
    $ l- i) g1 P/ U+ r( ]0 N7 D
复制代码
4 M2 E' N. S( c
3 T% e7 H( b1 M  o- p1 R3 b
9 a6 S' \1 F% o/ l
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

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

mildcat 沙发

2013-12-2 20:33:57

* }* A. C; s2 m! V 4 {$ S0 W4 c: U8 k$ G2 r" n PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能% C; o3 k9 B/ i" S g # z5 a4 a' h2 `8 K$ V# q[flash] & N, H# ?& X6 k4 I* Z( Q7 H- J/ o [/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


9 X+ z  I. H  T楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接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二次开发专题模块培训报名开始啦

    我知道了