|
|
请使用QQ关联注册PLM之家,学习更多关于内容,更多精彩原创视频供你学习!
您需要 登录 才可以下载或查看,没有账号?注册
×
PLM之家-NX9.0 二次开发实例视频-20 完善JA的选择功能; }; ]6 ] Q2 @/ P s0 Z/ Q) Y
内容:: S# U$ k2 g/ O a
默认录制的JA文件,在选择对象的时候,通过内部的标识去选取,如果改变其他的对象的时候,很可能程序执行失败,这个时候需要手动的进行代码的修改# z# z2 }' ~; `4 r, E5 P$ Z: Z# D
目的:
! z5 B2 s, S" z* T- ?使用添加选择功能,让用户交互式的进行选取对象,避免这种录制产生的缺陷。
- \9 s6 c: S+ c; a
; C* R, h! [2 ?& h" |
20 完善JA的选择功能
`; U& p, v: w, c9 k6 j, M3 b0 r9 n1 h; `. j. A
高清教程见楼下:; {2 ~# a1 `4 {, F
- Public Function Selectface(ByRef selectedObject) As NXObject
# v9 ^$ K7 O( @$ l1 s - Dim ui As UI = ui.GetUI, L5 N, g1 D/ g* K2 `
- Dim message As String = "Select face"
, C ? }- d% P/ v - Dim title As String = "Selection". n' F" b" ~# e& D
- Dim scope As Selection.SelectionScope = Selection. _: E# L+ a0 y( [, L
- SelectionScope.WorkPart& ^6 q' J# W/ b D% j
- Dim keepHighlighted As Boolean = True
5 g2 L. h* c9 ~ - Dim includeFeatures As Boolean = True: @+ Q, L5 G4 |8 x: U
- Dim response As Selection.Response
* \6 B( W+ \ u. f) B' p) X c3 G* M - Dim selectionAction As Selection.SelectionAction =
- [( G0 o/ q4 [. g$ n9 r4 _ - Selection.SelectionAction.ClearAndEnableSpecific4 U8 X) o& n- X& o. d
- Dim selectionMask_array(1) As Selection.MaskTriple
/ \8 `9 M3 Q' r/ }; A# R$ y - With selectionMask_array(0)
" P- w# [; D4 _" P4 |' L3 ? - .Type = UFConstants.UF_face_type
# b7 M; B6 W+ S4 s5 `, [ - .Subtype = 03 S7 M6 n0 D$ f9 h) D# \
- .SolidBodySubtype = 07 \7 [, s' r$ m w; h+ W: w
- End With
: k1 W4 \; d1 {5 r. @: E) _ - Dim cursor As Point3d
, u6 I# ?8 E' t$ z+ Q - response = ui.SelectionManager.SelectObject(message, _9 ~ {, C8 h# t
- title, scope, selectionAction, _
! u3 A( L {+ P) ~ - includeFeatures, keepHighlighted, _+ O9 h7 H/ h. q+ w! T0 B! v) X
- selectionMask_array, selectedObject, cursor)
! z4 D# y2 }4 @" T) c0 ^* m - If response = Selection.Response.Cancel Or response _5 h# `# }2 G* l6 P1 }; }/ m
- = Selection.Response.Back Then( }% k: `- d" @$ F! i/ `
- Return Nothing
5 R+ E9 J9 u! I- i/ H1 m - End If
3 X3 h. R6 ^ P: X, o - End Function
+ ]# ?' X) v8 v3 {; Q6 U/ O* s, b
复制代码
R4 M) W) y! L- K2 |$ R
' p6 w% [9 H1 h+ k, C! ]: b e( K6 f; b; v9 s5 H' N
|
|