QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 8562|回复: 32
收起左侧

[原创] 我的第二个外挂,自动取模型名存盘

[复制链接]
发表于 2010-6-21 17:51:35 | 显示全部楼层 |阅读模式 来自: 中国福建福州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

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

x
特点:取模型的名字存盘,可以挂在右键上, Snap3.jpg 9 W  N! C7 c! b6 ~4 ]
# P' C# u/ I7 f: Z- D# U2 L
) S) N3 O  ?  ?7 o2 m& A
" ]" s8 F4 k7 V! [/ p
9 k/ o% Q) P2 P7 @2 X. u$ {
注意,路径不可以有空格,不可以有圆点,否则不能执行。有用得到的就下吧。
/ L6 p  |( z, I本人VB入门级水平,各位见笑了。
  A" s$ _8 z  G( j: H) l+ N. V$ [' i" r8 `$ O0 u
外挂, 自动取模型名存盘.rar (3.52 KB, 下载次数: 460)

评分

参与人数 1三维币 +8 收起 理由
hh749 + 8 好资料,感谢您对论坛的支持!

查看全部评分

发表于 2010-6-21 19:26:24 | 显示全部楼层 来自: 中国河南鹤壁
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
发表于 2010-6-21 23:43:17 | 显示全部楼层 来自: 中国河北保定
谢谢分享+ ~6 U/ a5 a& W8 `
支持一下
发表于 2010-6-22 00:17:04 | 显示全部楼层 来自: 中国广东深圳
楼主能不能分享一下源码
 楼主| 发表于 2010-6-22 08:20:38 | 显示全部楼层 来自: 中国福建福州
怎么还是需要控件注册啊,现在不是有现成的类模块了吗) H/ k( F! y& F  W0 s$ P6 A" S4 G7 |
air8250 发表于 2010-6-21 19:26 http://www.3dportal.cn/discuz/images/common/back.gif

$ k+ J3 c- B- ?, E" Q5 X9 H. R2 D5 N% @1 ^1 _6 N
类模块没有用过,继续学习。
 楼主| 发表于 2010-6-22 08:24:07 | 显示全部楼层 来自: 中国福建福州
楼主能不能分享一下源码
5 _. C) `) S3 j& m傲世浮云 发表于 2010-6-22 00:17 http://www.3dportal.cn/discuz/images/common/back.gif

; Q/ `9 M! g5 R( D0 e  \7 X3 f' {# n- O9 T8 ~* B: S! I, r$ M
源码很简单,
1 N* c* @4 u0 N" R, H& YPrivate Sub Form_Activate()2 d) K! h+ ]7 {+ g8 [
Me.Hide! v- u* m' ~8 z; S7 V9 G/ `( k1 }
PowerMILL31.Connect) s# O8 Z/ ~( `9 F
Dim aa As String6 g2 f& }% s4 m, x0 Q
Dim bb() As String
2 O; R3 c" a$ J- E. M9 VDim cc As String6 Q) t' _3 d" g( k" P
Dim dd() As String/ |' u0 p9 |0 V  g9 B& T7 S2 R
Dim ee() As String
4 k5 @) e1 c! Z0 ^+ o7 b6 @5 @- zDim ff() As String
' `$ P' }7 _1 ?9 F% Y/ tPowerMILL31.Execute ("dialogs message off")
! }9 f6 }# y  C# K5 {+ lPowerMILL31.Execute ("dialogs error off")
* f, T" q* i0 i. Y) Raa = PowerMILL31.ExecuteEx("print entity model")
9 ?- i* n. M* jbb = Split(aa, "'")
% n% d. I( M; [& d& hcc = PowerMILL31.ExecuteEx("print entity parameters model  " & bb(1))" b, t6 V1 Y" v3 D
dd = Split(cc, vbCrLf): Z  F' w- Z, I: Q% L6 U* O
ee = Split(dd(3), " "); H4 F. O3 b4 Z# K! a! T  N
ff = Split(ee(4), ".")
/ w7 ^  h7 R7 x4 [PowerMILL31.Execute ("PROJECT SAVE AS PROJSELECTOR " & ff(0))* V6 C/ u2 `7 ]/ f
PowerMILL31.Execute ("dialogs message on")
$ ?" B8 c% O$ u. f: R- JPowerMILL31.Execute ("dialogs error on")
5 L+ a6 x2 e1 u7 V5 H$ h3 HPowerMILL31.Execute ("UNDRAW AXES")
% k" k/ ^  }6 x; ^% n' Z# dPowerMILL31.Execute ("ROTATE TRANSFORM TOP VIEWMILL RESIZEVIEW")
% P$ W$ p$ }, X% V4 V/ _End- C$ x$ k! x) d; n  C
End Sub

评分

参与人数 1三维币 +8 收起 理由
hh749 + 8 好资料,感谢您对论坛的支持!

查看全部评分

发表于 2010-6-22 12:21:02 | 显示全部楼层 来自: 中国广东深圳
研究一下,谢谢楼主
发表于 2010-6-22 18:46:14 | 显示全部楼层 来自: 中国浙江嘉兴
下了就要顶起来。。。
发表于 2010-6-28 22:02:01 | 显示全部楼层 来自: 中国广东江门
本帖最后由 freeceke 于 2010-6-28 22:04 编辑   q; @1 I+ J; g1 M, C+ d# k7 M

8 q( c4 \7 L% f* V  Z! |我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外挂方便一些!
333.JPG
发表于 2010-6-29 09:36:50 | 显示全部楼层 来自: 中国黑龙江哈尔滨
楼主的外挂如果能选路径就好了!
 楼主| 发表于 2010-6-29 10:06:15 | 显示全部楼层 来自: 中国福建福州
我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外 ...
* E& ]! M4 v% ?; j4 p8 Z- z4 S1 Vfreeceke 发表于 2010-6-28 22:02 http://www.3dportal.cn/discuz/images/common/back.gif

/ |2 ~6 N- f3 |4 m: e% i% C4 s
7 G9 }, w' I) g$ B. S在这里,希望能用得上。http://www.3dportal.cn/discuz/viewthread.php?tid=922250&extra=page%3D1
 楼主| 发表于 2010-6-29 10:17:10 | 显示全部楼层 来自: 中国福建福州
本帖最后由 清水88 于 2010-6-29 11:56 编辑 ! `' m2 ^' Q3 s0 B  a- Y5 O& E  e
楼主的外挂如果能选路径就好了!% K& G$ f/ m, f3 H9 T
dongzi52 发表于 2010-6-29 09:36 http://www.3dportal.cn/discuz/images/common/back.gif
这样的外挂,网上很多,我也共享一个我写的吧。 读入存盘.rar (3.76 KB, 下载次数: 138)
发表于 2010-6-30 09:44:45 | 显示全部楼层 来自: 中国黑龙江哈尔滨
12楼朋友:你的外挂只能读不能自动存我想要的路径。
 楼主| 发表于 2010-6-30 12:29:27 | 显示全部楼层 来自: 中国福建福州
12楼朋友:你的外挂只能读不能自动存我想要的路径。* q; U+ L" B# v( s
dongzi52 发表于 2010-6-30 09:44 http://www.3dportal.cn/discuz/images/common/back.gif
你想存到哪个路径?我给你改。不过每次都是固定的,如果没有这个路径,将自动创建。
发表于 2010-6-30 17:14:46 | 显示全部楼层 来自: 中国广东深圳
看看,正想学呢
发表于 2010-6-30 23:11:57 | 显示全部楼层 来自: 中国福建福州
看看,正想学呢
发表于 2010-7-3 18:08:01 | 显示全部楼层 来自: 中国重庆
中文名不行?好像
 楼主| 发表于 2010-7-3 18:59:59 | 显示全部楼层 来自: 中国福建福州
中文名不行?好像2 m/ q, h. n3 ~( @: N
b68951352 发表于 2010-7-3 18:08 http://www.3dportal.cn/discuz/images/common/back.gif
当然不行啊!你不用我的外挂,你能把中文名倒进来吗?那我就服你了!
发表于 2010-7-12 16:37:16 | 显示全部楼层 来自: 中国广东深圳
请问楼主,如果我想在前面加二三个字,如“前模-”或“铜公-”那又怎么搞,在哪里加?可以吗
发表于 2010-10-10 21:49:21 | 显示全部楼层 来自: 中国广东珠海
好东西
( V& e0 k3 h# t# t% V& t$ j1 D3 v3 {1 {想学怎么做的出来的
发表于 2010-10-12 07:37:08 | 显示全部楼层 来自: 中国广东广州
好东西,支持一下
发表于 2010-10-30 23:45:56 | 显示全部楼层 来自: 中国广东珠海
好东西,支持一下
发表于 2010-10-31 07:11:00 | 显示全部楼层 来自: 中国浙江台州
看看,正想学呢
发表于 2010-10-31 16:02:02 | 显示全部楼层 来自: 中国浙江杭州
正在学当中老大吗能提供源代码吗
发表于 2010-11-5 21:09:17 | 显示全部楼层 来自: 中国广东珠海
老大,有没有宏啊,能不能发宏上来看看啊!!!!!!!
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表