QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
特点:取模型的名字存盘,可以挂在右键上, Snap3.jpg 6 D: e# B$ Y# P/ n, G% o

7 U  @: g" B( B! P) C6 Y+ S8 n( ?. U2 g  n1 }: z0 z
4 O* S( n1 o; e4 t

5 ?7 n- t0 n! |. j2 B" g; m- R注意,路径不可以有空格,不可以有圆点,否则不能执行。有用得到的就下吧。8 |) h, F& f* g9 B
本人VB入门级水平,各位见笑了。) C& y1 q* Z1 f& a
+ s( {* Z" ?( k4 M* T: @  N
外挂, 自动取模型名存盘.rar (3.52 KB, 下载次数: 460)

评分

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

查看全部评分

发表于 2010-6-21 19:26:24 | 显示全部楼层 来自: 中国河南鹤壁
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
发表于 2010-6-21 23:43:17 | 显示全部楼层 来自: 中国河北保定
谢谢分享, `$ q4 o0 V1 {9 [
支持一下
发表于 2010-6-22 00:17:04 | 显示全部楼层 来自: 中国广东深圳
楼主能不能分享一下源码
 楼主| 发表于 2010-6-22 08:20:38 | 显示全部楼层 来自: 中国福建福州
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
! Z  z' i0 g. s0 Gair8250 发表于 2010-6-21 19:26 http://www.3dportal.cn/discuz/images/common/back.gif

( n9 i) N. ~4 ?' k8 _1 S, n5 C& [; w. F1 V7 ~
类模块没有用过,继续学习。
 楼主| 发表于 2010-6-22 08:24:07 | 显示全部楼层 来自: 中国福建福州
楼主能不能分享一下源码
& E) a/ m! a) q( f傲世浮云 发表于 2010-6-22 00:17 http://www.3dportal.cn/discuz/images/common/back.gif

+ q% m5 ?% i# w" D# C) [% |# j9 {1 q; l2 l4 V
源码很简单,( P5 u* K) t& D% B+ u. d
Private Sub Form_Activate()
: G$ V! h' {# N0 gMe.Hide5 ~* [/ _" i# J" Y4 R! y
PowerMILL31.Connect
! ]3 o6 ~9 X; D7 M; MDim aa As String5 g9 N3 A3 ~% C( i1 N8 Y8 k
Dim bb() As String
9 S: \1 d- }  }Dim cc As String
$ p4 `- w# I; c; E& t# C$ ADim dd() As String
% c2 q( O9 R% j& [! }( P( Z/ @Dim ee() As String. c% r  T. y/ t6 }5 z. v
Dim ff() As String
- _* ]& ~7 h+ }3 v# vPowerMILL31.Execute ("dialogs message off")
) s2 {5 q* }! \: o4 a" B( {PowerMILL31.Execute ("dialogs error off")
+ i! _2 _' y/ }2 T9 j" eaa = PowerMILL31.ExecuteEx("print entity model")$ R+ B" t/ K8 n9 C2 C! I
bb = Split(aa, "'")
1 J& Z5 k# d5 Y! Z1 [! O) N; Acc = PowerMILL31.ExecuteEx("print entity parameters model  " & bb(1))
; y0 g; y9 i: z- S( P- i) Sdd = Split(cc, vbCrLf)
$ H( i$ e- Z) A) \ee = Split(dd(3), " ")0 W) r- j- k9 a+ c4 Z
ff = Split(ee(4), ".")9 `2 o+ H9 N" _0 r6 g1 e
PowerMILL31.Execute ("PROJECT SAVE AS PROJSELECTOR " & ff(0))
/ \' {- z* b/ {4 M% B. k* s+ RPowerMILL31.Execute ("dialogs message on")
/ o+ _* l( {9 X. B) |% ?# S# APowerMILL31.Execute ("dialogs error on")
: `5 U' \. m. Z. J  fPowerMILL31.Execute ("UNDRAW AXES")
4 T: F" W# J' c+ z, \PowerMILL31.Execute ("ROTATE TRANSFORM TOP VIEWMILL RESIZEVIEW")' ~. H& Q# x+ Y; C0 l
End
1 ^7 c5 u' a+ l8 |; xEnd 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 编辑   F' X  h" m& I) w( R" h
. U8 Y* ]( _3 Y+ C( q) ]
我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外挂方便一些!
333.JPG
发表于 2010-6-29 09:36:50 | 显示全部楼层 来自: 中国黑龙江哈尔滨
楼主的外挂如果能选路径就好了!
 楼主| 发表于 2010-6-29 10:06:15 | 显示全部楼层 来自: 中国福建福州
我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外 ...2 ~" I5 ]) V9 i- a; j6 X  D; z  N
freeceke 发表于 2010-6-28 22:02 http://www.3dportal.cn/discuz/images/common/back.gif

+ }/ E0 b" V& F0 {3 {; l2 [2 @( E, R8 |5 ]. b/ n1 ]
在这里,希望能用得上。http://www.3dportal.cn/discuz/viewthread.php?tid=922250&extra=page%3D1
 楼主| 发表于 2010-6-29 10:17:10 | 显示全部楼层 来自: 中国福建福州
本帖最后由 清水88 于 2010-6-29 11:56 编辑 / u+ N7 f' e+ K  x# i+ {$ v
楼主的外挂如果能选路径就好了!
( y# j% y$ Y9 n7 N9 Ndongzi52 发表于 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楼朋友:你的外挂只能读不能自动存我想要的路径。
2 z  U  Q3 O2 {3 p# y4 P; Xdongzi52 发表于 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 | 显示全部楼层 来自: 中国福建福州
中文名不行?好像9 _. g& L4 U9 [7 g2 q: ~/ T$ K
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 | 显示全部楼层 来自: 中国广东珠海
好东西& Q" |7 @+ }" c( p% b8 k
想学怎么做的出来的
发表于 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 )

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