QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
特点:取模型的名字存盘,可以挂在右键上, Snap3.jpg
% A/ R' P; M6 `) M
6 b7 Z3 Z6 O8 s$ ?0 d6 m
5 s9 G3 _+ I' `. a/ k) p7 N; m' j
3 }/ x- M' v2 _) U) g9 W
" b& y* O1 I5 [5 K注意,路径不可以有空格,不可以有圆点,否则不能执行。有用得到的就下吧。, a! |4 |$ @8 I$ A! f7 g
本人VB入门级水平,各位见笑了。
% \7 j! L- [6 I8 d; _* D, M) Y
( V3 M0 b7 v& |' X外挂, 自动取模型名存盘.rar (3.52 KB, 下载次数: 460)

评分

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

查看全部评分

发表于 2010-6-21 19:26:24 | 显示全部楼层 来自: 中国河南鹤壁
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
发表于 2010-6-21 23:43:17 | 显示全部楼层 来自: 中国河北保定
谢谢分享/ E+ \- c# T2 n6 V! f
支持一下
发表于 2010-6-22 00:17:04 | 显示全部楼层 来自: 中国广东深圳
楼主能不能分享一下源码
 楼主| 发表于 2010-6-22 08:20:38 | 显示全部楼层 来自: 中国福建福州
怎么还是需要控件注册啊,现在不是有现成的类模块了吗6 r/ |1 ~0 J4 I- d
air8250 发表于 2010-6-21 19:26 http://www.3dportal.cn/discuz/images/common/back.gif

' `# f; A+ J% K7 J/ C0 X/ l( N0 M3 r& e. v" ?- ~4 d* Y/ V
类模块没有用过,继续学习。
 楼主| 发表于 2010-6-22 08:24:07 | 显示全部楼层 来自: 中国福建福州
楼主能不能分享一下源码( P7 v% y1 N4 u/ D1 Y& j
傲世浮云 发表于 2010-6-22 00:17 http://www.3dportal.cn/discuz/images/common/back.gif
2 o/ Q8 ]' R4 j/ \0 H" n
1 j2 T2 R3 r7 X" Q8 u
源码很简单,7 f5 a2 b6 T& F
Private Sub Form_Activate(). \9 C* D% N& Y$ C9 H6 v
Me.Hide$ ]  H2 t5 S6 R
PowerMILL31.Connect" ]  ^8 t, b6 E
Dim aa As String: j) N  Z: m: D7 J3 n% _
Dim bb() As String
2 I. e  A0 V, e& O; p. I3 b# GDim cc As String
) R; Z# Y' N+ P4 C7 S' l" hDim dd() As String
  y; `) d% X- S. x7 s1 wDim ee() As String
( ^- f6 w& x( v1 b5 C; pDim ff() As String' F/ S0 v0 X! N8 a9 |, n' [6 t
PowerMILL31.Execute ("dialogs message off")
5 A/ ~, U" v# P! ^$ }PowerMILL31.Execute ("dialogs error off")
3 }2 E* [! U6 P5 W- Baa = PowerMILL31.ExecuteEx("print entity model")  a, g4 W) D! y1 }* v
bb = Split(aa, "'")  F3 Q! [4 V( X+ H
cc = PowerMILL31.ExecuteEx("print entity parameters model  " & bb(1)), u, G3 D9 o* }' N+ O# H
dd = Split(cc, vbCrLf)
- X+ T: T3 K/ Z$ A) b+ Cee = Split(dd(3), " ")6 u: W* E! K+ N+ l8 Y
ff = Split(ee(4), ".")
8 e) S  f2 r7 A( rPowerMILL31.Execute ("PROJECT SAVE AS PROJSELECTOR " & ff(0))
3 |' q2 h$ x4 Z& }# o- xPowerMILL31.Execute ("dialogs message on")
* J$ k, s. W- ePowerMILL31.Execute ("dialogs error on")2 l1 ^+ m% y1 w* Y. u
PowerMILL31.Execute ("UNDRAW AXES")
# I5 h' i& t; LPowerMILL31.Execute ("ROTATE TRANSFORM TOP VIEWMILL RESIZEVIEW")0 q% O" [$ p+ B7 P; Y
End8 ^) B$ B1 E( X  @- |3 r$ Q
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 编辑 ; U: |/ J) }, f
" R0 G7 V, A# b/ \2 A
我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外挂方便一些!
333.JPG
发表于 2010-6-29 09:36:50 | 显示全部楼层 来自: 中国黑龙江哈尔滨
楼主的外挂如果能选路径就好了!
 楼主| 发表于 2010-6-29 10:06:15 | 显示全部楼层 来自: 中国福建福州
我喜欢这样的小外挂!还有,你能做多两个小外挂吗?就是1:刀路按数字命名;2:刀路按数字命名。。程式运行时没有显示,运行此外挂就自动按数字命名刀路或者边界了!JIMMY版主的外挂也有此功能,但我觉得做两个分散的外 ...
# C4 L: |3 s7 e" f0 wfreeceke 发表于 2010-6-28 22:02 http://www.3dportal.cn/discuz/images/common/back.gif
7 w! k% e2 h: f4 t( v! U! `+ q( T8 L
# W* v# b% c) Z6 d/ G7 k$ T  j
在这里,希望能用得上。http://www.3dportal.cn/discuz/viewthread.php?tid=922250&extra=page%3D1
 楼主| 发表于 2010-6-29 10:17:10 | 显示全部楼层 来自: 中国福建福州
本帖最后由 清水88 于 2010-6-29 11:56 编辑 6 X* b# p* a+ }* A4 g+ b/ K
楼主的外挂如果能选路径就好了!
7 Y; }1 g0 D1 udongzi52 发表于 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楼朋友:你的外挂只能读不能自动存我想要的路径。
5 |: G9 V( e. J* a4 Fdongzi52 发表于 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 a& m: @! R2 h, @1 N1 Y
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 | 显示全部楼层 来自: 中国广东珠海
好东西7 w4 h' a! g7 v
想学怎么做的出来的
发表于 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 )

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