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

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

  [复制链接]

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

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

mildcat 楼主

2013-12-2 20:33:45

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

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

x
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能" K7 M+ v3 \8 I
内容:
; ]! B0 f+ j2 s, l( N: U2 D# B默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改
6 n/ E4 ~9 h! T# j4 {目的:
; H$ e) X& r2 {) H2 _使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。
. |. g4 K5 f5 t9 Z, P
2 R& u; F' L) v- ?6 ~* H

20 完善JA的选择功能

20 完善JA的选择功能

  d3 \5 A! _# W1 g7 e
/ l" i, [7 q0 Z
高清教程见楼下:
, H0 W4 _2 e, K9 _. n
  1. Public  Function  Selectface(ByRef  selectedObject)  As  NXObject
    ) Q& b" R- r' y
  2. Dim  ui  As  UI  =  ui.GetUI$ \7 q7 g2 R4 W# T3 S* Z
  3. Dim  message  As  String  =  "Select  face"# A2 t# V7 A- B* ~* g3 f/ c
  4. Dim  title  As  String  =  "Selection"
    & V, t0 T0 W& |& U" T/ r: O
  5. Dim  scope  As  Selection.SelectionScope    =  Selection.  _" _6 b7 v6 D" B
  6. SelectionScope.WorkPart
    2 A, i! U8 z0 P3 M
  7. Dim  keepHighlighted  As  Boolean  =  True% A+ R% F- S0 \1 |0 L' Q
  8. Dim  includeFeatures  As  Boolean  =  True
    1 J. M$ m1 q2 v! r2 g0 [
  9. Dim  response  As  Selection.Response
    ' p! Q2 I  M& |; M7 }7 I. Q
  10. Dim  selectionAction  As  Selection.SelectionAction  =
    " D/ S3 A" ]$ z4 E5 ]% ~
  11. Selection.SelectionAction.ClearAndEnableSpecific9 y& P* w  \$ j7 Z0 {; i/ j
  12. Dim  selectionMask_array(1)  As  Selection.MaskTriple. Y- \% y% e) t) P
  13. With  selectionMask_array(0)
    * j& j3 o5 W( W" O; Z, a
  14. .Type  =  UFConstants.UF_face_type" }) u! T4 D" \& a: p
  15. .Subtype  =  0, [' \( g$ L5 C% c* E' J8 q
  16. .SolidBodySubtype  =  0
    1 H, Z+ V8 D( U: M
  17. End  With
      x- Z" Y) p" r- m
  18. Dim  cursor  As  Point3d8 B" z6 ?- y+ z
  19. response  =  ui.SelectionManager.SelectObject(message,  _" d) Z8 C+ h# f
  20. title,  scope,  selectionAction,  _
    " b3 F) ]7 _( s3 v1 t. u9 P1 c
  21. includeFeatures,  keepHighlighted,  _4 x: _( m- J5 U9 e3 ~
  22. selectionMask_array,  selectedObject,  cursor): y! M) ]2 n7 ?5 s  i- g
  23. If  response  =  Selection.Response.Cancel  Or  response  _
    $ i. y$ b2 N9 Y+ p# f
  24. =  Selection.Response.Back  Then' S2 {, c1 F" S4 C" g
  25. Return  Nothing
    ' L5 ]1 l! ]6 j9 o
  26. End  If4 I8 j# g% W! X- L; h$ R5 B" H
  27. End  Function
    ( f( s" e& ~1 L' a( L  L6 [
复制代码

8 |, R7 v; I& q- \) k( E9 ?4 O  x3 }% {

/ a5 Y. X9 \7 R- `8 w
该会员没有填写今日想说内容.
回复

使用道具 举报

全部回复125

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

mildcat 沙发

2013-12-2 20:33:57

/ j( V( v4 w; S7 G 0 X/ e: m Y. t( t+ z PLM之家NX9.0二次开发视频教程 20 完善JA的选择功能/ C3 ^* j' M v- w c2 l7 c) c0 W U9 b" P( C6 _ [flash] ( T6 M ?* h: I: S. }; }) j [/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


2 T  c! y8 f. g楼主辛苦啦.谢谢楼主
上海点团信息科技有限公司,承接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二次开发专题模块培训报名开始啦

    我知道了