QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 2090|回复: 9
收起左侧

[求助] 那位高手帮忙看看以下修改路经名称代码后面如何编写呢

[复制链接]
发表于 2013-5-3 20:07:23 | 显示全部楼层 |阅读模式 来自: 中国山西晋城

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

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

x
本帖最后由 空白式记忆 于 2013-5-3 20:09 编辑
. A; d4 R1 Q8 X9 n# E1 a3 u- u, }( b+ M6 h. E
result = pmill.ExecuteEx("print entity toolpath")
. _  Y# C  e- Q4 B! D( vCombo1.Text = result
: k2 Q0 w! H( t, g' T  _4 W& z2 l& k
+ s* Z2 i) f' W9 T7 h
splitresult = Split(result, " '"). D/ K5 l* |; H. q5 q' g2 T
* i" T( t2 V: B( W
For i = 1 To UBound(splitresult)
* X( j* f% z' m* U; }" P; r
7 d3 H& {, U/ s3 R6 ]4 `splitresult(i) = Replace(splitresult(i), " ", "")7 M" B+ F, L1 a3 N
splitresult(i) = Replace(splitresult(i), "'", "")
! e! u* k, M& b8 ~  t' h% asplitresult(i) = Trim(splitresult(i)). e( U% a' K6 i  i- I$ [( z; N
If splitresult(i) <> "" Then str = splitresult(i)
' Y5 ^  D7 O4 W, {3 O
2 r- T: ?2 R1 Xpmill.Execute ("activate toolpath" & Chr(32) & str)
! T, E4 o+ |5 w, x; L* C4 |: k* n1 _
test = pmill.ExecuteEx("print entity parameters toolpath" & Chr(32) & str)
  ~4 Z7 z* L6 k* v% w! r'test = Text1.Text
2 x! R1 n6 I0 ~7 D0 G% k: i3 b6 C9 e1 w9 X- }- H- L2 B! s
'iSpace = InStr(test, "TOOL-ID  :")( F* `0 T! J$ f' }: ?4 r0 c
iSpace = InStr(test, "TOOL-NUMBER  :")
: z! X. G9 b+ ]5 x6 T# _- stemp = iSpace
' P0 S+ f9 b5 i1 N; WstrTest = Mid(test, iSpace + 10, 17)
发表于 2013-5-3 21:29:04 | 显示全部楼层 来自: 中国广东东莞
你写的东西看不懂,你要什么结果,有空帮你写个吧。。VB.NET软件。。
 楼主| 发表于 2013-5-4 20:40:12 | 显示全部楼层 来自: 中国山西晋城
fhqiwmc 发表于 2013-5-3 21:29 static/image/common/back.gif, i$ P5 p+ G, O" P& _
你写的东西看不懂,你要什么结果,有空帮你写个吧。。VB.NET软件。。
$ f) Y( _- m6 C/ ~
批量检查路径干涉批量修改路径名称批量后处理!我想要这几种结果!如果可以帮我写那真是谢谢你额!
发表于 2013-5-4 21:08:35 | 显示全部楼层 来自: 中国广东惠州
你说的我都有现成的了。不过干涉没有,只有过切。你说的都是小菜一碟的东西。。因为我们公司做的东西都不高我就没做干涉。
发表于 2013-5-4 21:10:11 | 显示全部楼层 来自: 中国广东惠州
不要写那么没有意思的东西了。写点自动刀路才有意义。
 楼主| 发表于 2013-5-5 10:46:38 | 显示全部楼层 来自: 中国山西晋城
fhqiwmc 发表于 2013-5-4 21:08 static/image/common/back.gif' s) r. h" l; T2 y, K  g" u$ P
你说的我都有现成的了。不过干涉没有,只有过切。你说的都是小菜一碟的东西。。因为我们公司做的东西都不高 ...

$ N" c& P; w0 @; e9 H1 m那你可以把代码发给我的吗?谢谢你了哦!
 楼主| 发表于 2013-5-5 10:47:09 | 显示全部楼层 来自: 中国山西晋城
fhqiwmc 发表于 2013-5-4 21:10 static/image/common/back.gif* i- B5 Y7 a3 V0 N6 W2 y9 {) X$ R+ `0 k
不要写那么没有意思的东西了。写点自动刀路才有意义。
' i& v( ~8 H; ]) V( P( @
有的步骤是需要有的!有时候修改完路经需要那些东西的!
发表于 2013-5-5 20:20:22 | 显示全部楼层 来自: 中国广东东莞
软件可以给你,代码网上多的去哟。。
 楼主| 发表于 2013-5-5 20:57:29 | 显示全部楼层 来自: 中国山西晋城
fhqiwmc 发表于 2013-5-5 20:20 static/image/common/back.gif0 |! E; h8 q" z9 d
软件可以给你,代码网上多的去哟。。

$ r) ?: K9 z* H! s+ q代码不可以给我分享下的吗?修改起来的话会比较方便点的!439365921号码!加我啊!
 楼主| 发表于 2013-5-6 21:05:29 | 显示全部楼层 来自: 中国山西晋城
fhqiwmc 发表于 2013-5-5 20:20 static/image/common/back.gif
7 A% t, y7 B: |0 n/ J( N& W软件可以给你,代码网上多的去哟。。
: {) s: s  p2 t! G+ J
可以发给我的吗?
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


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

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

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