QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
特点:取模型的名字存盘,可以挂在右键上, Snap3.jpg ' t& K4 }3 Z2 G6 F/ B: _* V! _

; l' }3 X9 q6 M7 V
$ N) F5 V% n: }2 F, x- U
4 e2 C0 E' C% D0 E# b; p( {2 s$ o1 q+ `
注意,路径不可以有空格,不可以有圆点,否则不能执行。有用得到的就下吧。8 S: v% ~/ }* g& Y) U- L0 n) m
本人VB入门级水平,各位见笑了。
( x6 r0 ]8 ^* ]' z' w- x& j! D9 b
9 K+ O$ f& Z5 ]7 @# U外挂, 自动取模型名存盘.rar (3.52 KB, 下载次数: 460)

评分

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

查看全部评分

发表于 2010-6-21 19:26:24 | 显示全部楼层 来自: 中国河南鹤壁
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
发表于 2010-6-21 23:43:17 | 显示全部楼层 来自: 中国河北保定
谢谢分享. J/ I! n# c. O' u+ u, ^- @- C
支持一下
发表于 2010-6-22 00:17:04 | 显示全部楼层 来自: 中国广东深圳
楼主能不能分享一下源码
 楼主| 发表于 2010-6-22 08:20:38 | 显示全部楼层 来自: 中国福建福州
怎么还是需要控件注册啊,现在不是有现成的类模块了吗
: ]1 g+ S% W9 y9 o7 [% aair8250 发表于 2010-6-21 19:26 http://www.3dportal.cn/discuz/images/common/back.gif
% r4 V; r( N3 K+ E. ]; q

4 @- A7 ]% Y* _类模块没有用过,继续学习。
 楼主| 发表于 2010-6-22 08:24:07 | 显示全部楼层 来自: 中国福建福州
楼主能不能分享一下源码) q$ [  ~% R9 ?/ [; V
傲世浮云 发表于 2010-6-22 00:17 http://www.3dportal.cn/discuz/images/common/back.gif
: {( x5 u9 x6 u( ^

$ }, S1 k4 |* @9 |% o2 E源码很简单,5 v% Q. I/ h; i/ f
Private Sub Form_Activate(): l6 [3 F0 L% A2 F0 R. v+ V! K4 X1 q
Me.Hide4 A4 ]3 G) ]2 _0 o2 Y3 M
PowerMILL31.Connect& B* T0 R( \/ B4 x" ^( z$ L
Dim aa As String
* g2 O) Z) n/ U: g; PDim bb() As String
& E, l3 z1 c3 H2 T; R2 v, P+ cDim cc As String- r- @. b" N+ E' f4 ^
Dim dd() As String2 }* {% Q1 w8 O# {
Dim ee() As String
; Y% P6 S2 @  S% ~# C) r3 pDim ff() As String
; H" z4 j4 j' Z. q1 BPowerMILL31.Execute ("dialogs message off")7 L8 t" X" ~- _3 y1 t
PowerMILL31.Execute ("dialogs error off")
" C% q7 ~7 f; {aa = PowerMILL31.ExecuteEx("print entity model")
) p: O2 g: V, Sbb = Split(aa, "'")9 H. X/ u5 N6 H5 Q3 r" Y0 p
cc = PowerMILL31.ExecuteEx("print entity parameters model  " & bb(1))5 a& ?% o; o8 k. K+ m6 u( q( A3 w7 o
dd = Split(cc, vbCrLf)! D& J* w% Q5 o! S
ee = Split(dd(3), " ")
, ^) O! N+ ^+ V! k! z" n+ M) off = Split(ee(4), ".")
8 n& O! X: C' q6 HPowerMILL31.Execute ("PROJECT SAVE AS PROJSELECTOR " & ff(0))
  V/ \) W1 m0 fPowerMILL31.Execute ("dialogs message on")
9 A5 d2 ]8 m( w5 j$ o  cPowerMILL31.Execute ("dialogs error on")
8 S8 }0 P8 k3 ]; ]7 }PowerMILL31.Execute ("UNDRAW AXES")
" \7 N/ [" O% ]PowerMILL31.Execute ("ROTATE TRANSFORM TOP VIEWMILL RESIZEVIEW")
5 n8 K8 |, \/ \8 w; K5 GEnd
, B  k& O; ?* REnd 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 编辑 5 V: u. M# b/ U

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

7 l! Q) s& A- z, d& ]! n* C* a& t
' I" k; E) Z3 w2 {在这里,希望能用得上。http://www.3dportal.cn/discuz/viewthread.php?tid=922250&extra=page%3D1
 楼主| 发表于 2010-6-29 10:17:10 | 显示全部楼层 来自: 中国福建福州
本帖最后由 清水88 于 2010-6-29 11:56 编辑 - c$ X5 z/ |; L  h$ w- s
楼主的外挂如果能选路径就好了!2 ?( W7 G1 r) j) {+ y
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楼朋友:你的外挂只能读不能自动存我想要的路径。
7 H/ Y& y# O6 |9 i# ?, Q  @- e. ^, ]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 | 显示全部楼层 来自: 中国福建福州
中文名不行?好像
$ v) v. I% E/ N/ `! z+ i9 Hb68951352 发表于 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 | 显示全部楼层 来自: 中国广东珠海
好东西
' i) Y# _' e; n# h, `- p想学怎么做的出来的
发表于 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 )

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