AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
[討論]如何把Pline「截彎取直」後又自動接合成一條Pline 2020-211 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Oooo-110 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Oo-2-110 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Ziao1510 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline BPl3tjj [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Uos15010

[討論]如何把Pline「截彎取直」後又自動接合成一條Pline

向下

[討論]如何把Pline「截彎取直」後又自動接合成一條Pline Empty [討論]如何把Pline「截彎取直」後又自動接合成一條Pline

發表 由 kevinjyh 于 2014-01-29, 09:55

如圖,程序如下:
(1)Break指令選取A點及B點,以截斷AB間之弧線;
(2)自動補一條AB間直線段;
(3)自動選取3條pline並join成一條Pline。

這樣的功能要用到VBA嗎?
我曾經找到將多條Pline接合的指令列:^C^CPEDITACCEPT;1;SELECT;\PEDIT;M;P;;J;1;;PEDITACCEPT;0;
但是在我的第二步驟中,指令列要如何抓取A點及B點座標值,並且補上一條Pline直線???
亦或必須用到LISP或VBA的判斷式才行???

麻煩各位大大幫忙解惑!
[討論]如何把Pline「截彎取直」後又自動接合成一條Pline Plinea10
kevinjyh
kevinjyh
一般會員
一般會員

文章總數 : 21
年齡 : 50
來自 : 台東
職業 : 營建業
愛好 : 電腦
個性 : 好相處
使用年資 : 5年
使用版本 : 2008
經驗值 : 3260
威望值 : 18
注冊日期 : 2011-12-17
男 雙魚座 狗

回頂端 向下

[討論]如何把Pline「截彎取直」後又自動接合成一條Pline Empty 回復: [討論]如何把Pline「截彎取直」後又自動接合成一條Pline

發表 由 kevinjyh 于 2014-02-04, 08:23

在Cadalyst Polyline Edit Tools In VBA找到可以增加或刪除Polyline頂點的VBA程式碼,原來它也是用逼近法求得Pline頂點的序號後,再處理的!
我無法上傳原始碼,請大家自行至連結下載……
但我自己尚未研究完成,請大家交流交流!
kevinjyh
kevinjyh
一般會員
一般會員

文章總數 : 21
年齡 : 50
來自 : 台東
職業 : 營建業
愛好 : 電腦
個性 : 好相處
使用年資 : 5年
使用版本 : 2008
經驗值 : 3260
威望值 : 18
注冊日期 : 2011-12-17
男 雙魚座 狗

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
[討論]如何把Pline「截彎取直」後又自動接合成一條Pline Uos15010 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline BPl3tjj [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Ziao1510 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Oo-2-110 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline Oooo-110 [討論]如何把Pline「截彎取直」後又自動接合成一條Pline 2020-211