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

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

  [复制链接]

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

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

mildcat 楼主

2013-12-2 20:33:45

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能
0 @6 `0 S7 x" k* n' K. V/ C5 X3 E8 Z内容:
  S( a9 x) |5 R% O! a7 P默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改9 `) w  W; \: i- ~1 J
目的:& T$ i2 E+ {+ L. ]
使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。0 g3 c8 d- a* T! l) s( R5 u
" T9 k1 h) U% ]$ i

20 完善JA的选择功能

20 完善JA的选择功能
( w( k2 ]1 h. y& Z* G( @' q
; k% x! x& N, U/ B  J# N" ^
高清教程见楼下:3 ~3 x4 k6 s" |+ {, O! z
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject3 i4 o, q4 m5 c: f' F
  2. Dim  ui  As  UI  =  ui.GetUI
    ; |: u( J2 }, ~( a7 \6 P  R* B
  3. Dim  message  As  String  =  "Select  face"* [8 N1 L1 s2 _5 D4 e
  4. Dim  title  As  String  =  "Selection"4 ^% w7 j. q  q8 U
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _  z8 c6 K7 [8 R, i( B
  6. SelectionScope.WorkPart
    5 O3 U/ \. V3 D3 W' J
  7. Dim  keepHighlighted  As  Boolean  =  True
    ; I7 y3 j3 \+ z7 v! Y
  8. Dim  includeFeatures  As  Boolean  =  True
    2 A+ W" P9 c4 a; q+ F3 l2 N
  9. Dim  response  As  Selection.Response
    6 U; V# E& U. V0 {$ @" ^2 M
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    2 ?0 c# p2 e3 H/ q7 O$ J% U0 B
  11. Selection.SelectionAction.ClearAndEnableSpecific: o' S+ z9 _* v5 w/ I/ h- p8 z7 T
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple' w0 |, o0 h  ^
  13. With  selectionMask_array(0)/ f9 i5 ?+ C* P5 Z) {9 [8 a. p
  14. .Type  =  UFConstants.UF_face_type* `/ I" ^6 q9 |& ]4 u5 x" c. S
  15. .Subtype  =  0+ P- Y  \. o5 X
  16. .SolidBodySubtype  =  08 H6 V: v% C' }* Z0 W9 m
  17. End  With' P" b, ?- V+ @% i" z" H( a% l
  18. Dim  cursor  As  Point3d
    ; U1 S; Q5 U1 @& p1 p- q* R/ A5 Z# i
  19. response  =  ui.SelectionManager.SelectObject(message,  _* Z" p! i2 E) ^9 v
  20. title,  scope,  selectionAction,  _
      J# k8 K- i: D1 s9 l
  21. includeFeatures,  keepHighlighted,  _; Q7 ]# w. H; y) t* M- D
  22. selectionMask_array,  selectedObject,  cursor)
    9 m: v. }7 F! O8 G7 o4 ]0 V
  23. If  response  =  Selection.Response.Cancel  Or  response  _8 l: C' r, a3 p  h' |/ Z- i
  24. =  Selection.Response.Back  Then9 @* F$ y9 h1 N1 u7 U
  25. Return  Nothing) f* S; c9 ?" N  @5 D4 m
  26. End  If
    5 }  z8 @3 }* Z/ M% G" G! D
  27. End  Function
    ; Z* G2 V# _. j# e, U, ]
复制代码

/ H* i) B/ U4 a/ q4 H. k! l7 S: ^
6 ~& J1 F9 X$ o9 x1 w

# [/ h( B% g$ [: j, S+ f
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

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

mildcat 沙发

2013-12-2 20:33:57

" Z1 c; {4 y0 [# _) D 5 t' @) Y4 I3 E9 u2 ? PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能 * ?7 v2 V" O w' g A r9 T- t( Y4 H- a1 r[flash] 9 l! [$ }: m, d1 j( k7 L [/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

  L- g3 E+ i9 _& O0 ~7 @
楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接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二次开发专题模块培训报名开始啦

    我知道了