AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

Join the forum, it's quick and easy

AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
如何在 LSIP 使用 explode Ioaoe110如何在 LSIP 使用 explode 2020-310如何在 LSIP 使用 explode Oiu15010如何在 LSIP 使用 explode 2020-211如何在 LSIP 使用 explode Ia15010如何在 LSIP 使用 explode Aizyao10如何在 LSIP 使用 explode Uos15010如何在 LSIP 使用 explode BPl3tjj如何在 LSIP 使用 explode Ziao1510
如何在 LSIP 使用 explode Oo-2-110如何在 LSIP 使用 explode Zuoiy_10如何在 LSIP 使用 explode Aizyao11如何在 LSIP 使用 explode Iyb_1510如何在 LSIP 使用 explode Aoe1-111如何在 LSIP 使用 explode Uos15011如何在 LSIP 使用 explode Aoe2da10如何在 LSIP 使用 explode Aoe2da11如何在 LSIP 使用 explode Aoe10

如何在 LSIP 使用 explode

3 posters

向下

如何在 LSIP 使用 explode Empty 如何在 LSIP 使用 explode

發表 由 WATSON513 2018-09-15, 12:50

菜鳥發問請多包涵

(defun c:TT1()
(setq AP3 (getpoint "\n左上點:"))
(setq AP1 (getpoint AP3 "\n右下點:"))
(command "_explode" "C" AP3 AP1 "") ;<= *無效的選取*
)

(defun c:TT2()
(setq AP3 (getpoint "\n左上點:"))
(setq AP1 (getpoint AP3 "\n右下點:"))
(command "_erase" "C" AP3 AP1 "")
)



想請較為何執行 TT1 會顯示以下錯誤 TT2不會

*無效的選取*
應有一個點或 前次(L)/全部(ALL)/群組(G)
; 錯誤: 函數被取消

可否教我 在 lisp 內使用explode

WATSON513
WATSON513
一般會員
一般會員

文章總數 : 37
年齡 : 48
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 4716
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 naruto018 2018-09-15, 14:29

參考看看
代碼:
(command "_.explode" (ssget "C" (getpoint) (getpoint)) "")

至於兩邊的差別只能請教高手了
naruto018
naruto018
中級會員
中級會員

文章總數 : 205
年齡 : 32
來自 : 高雄
職業 : 學習中(CAD,Revit,Excel VBA)
愛好 : 當個懶熊
個性 : 內向
使用年資 : 新手
使用版本 : 2015
AutoCAD基礎篇等級 : 10星級
積分 : 5
經驗值 : 4194
威望值 : 558
注冊日期 : 2016-11-29
藍鵲726號
男 摩羯座 羊

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 2018-09-15, 20:01

感謝你回應
我試過了
這樣做確實可以

這樣作只分解了一個物件
在窗選的區域內有多個物件要作分解
要如何作

WATSON513
WATSON513
一般會員
一般會員

文章總數 : 37
年齡 : 48
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 4716
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 naruto018 2018-09-15, 23:03

好像是分解指令在LISP只能對一個物件使用
用while迴圈來循環全部解決
代碼:
(setq SelObjs (ssget "C" (getpoint) (getpoint)));或不限定選取方式直接用(ssget)
(setq N -1)
(while (setq SelObj (ssname SelObjs (setq N (1+ N))))
    (command "_.explode" SelObj)
    )
naruto018
naruto018
中級會員
中級會員

文章總數 : 205
年齡 : 32
來自 : 高雄
職業 : 學習中(CAD,Revit,Excel VBA)
愛好 : 當個懶熊
個性 : 內向
使用年資 : 新手
使用版本 : 2015
AutoCAD基礎篇等級 : 10星級
積分 : 5
經驗值 : 4194
威望值 : 558
注冊日期 : 2016-11-29
藍鵲726號
男 摩羯座 羊

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 2018-09-16, 09:16

在LISP
分解指令 似乎真的只能一次一個

這樣我懂了
謝謝你



WATSON513
WATSON513
一般會員
一般會員

文章總數 : 37
年齡 : 48
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 4716
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 Tiger&蘋果爸 2018-09-17, 14:48

WATSON513 寫到:在LISP
分解指令 似乎真的只能一次一個

這樣我懂了
謝謝你
可以加入早期這個 QAFLAGS系統變數,設置為1即可多個分解
代碼:
(defun c:TT1()
 (setq AP3 (getpoint "\n左上點:"))         
 (setq AP1 (getpoint AP3 "\n右下點:"))
  (setvar "QAFLAGS" 1) ;<= *加入此行*
 (command "_explode" "C" AP3 AP1 "") 
)

____________________________________________________________________________________
👉[好康]🎁加入專屬B取得大補帖及看2D+3D影片(點我)👈
如何在 LSIP 使用 explode Sesa2011 如何在 LSIP 使用 explode Youtub11 如何在 LSIP 使用 explode Oiea2011 如何在 LSIP 使用 explode Oe20011 如何在 LSIP 使用 explode Fbi20011 如何在 LSIP 使用 explode Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21077
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88422
威望值 : 16930
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 2018-09-18, 13:23



感謝蘋果爸
提供"QAFLAGS"這個系統變數
剛實測了可以用

QAFLAGS這個系統變數
在2016版本 說明裡似乎沒有資料
我在這裡
https://www.autocad-tw.com/t14991-topic
相關的說明

剛使用發現QAFLAGS不只影響分解指令
也影響插入圖塊指令
WATSON513
WATSON513
一般會員
一般會員

文章總數 : 37
年齡 : 48
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 4716
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 Tiger&蘋果爸 2018-09-18, 15:43

WATSON513 寫到:感謝蘋果爸
提供"QAFLAGS"這個系統變數
剛實測了可以用

QAFLAGS這個系統變數
在2016版本 說明裡似乎沒有資料
我在這裡
https://www.autocad-tw.com/t14991-topic
相關的說明

剛使用發現QAFLAGS不只影響分解指令
也影響插入圖塊指令
通常程式中我還會把它QAFLAGS還原為0
其他的指令才不會受影響~
認同

____________________________________________________________________________________
👉[好康]🎁加入專屬B取得大補帖及看2D+3D影片(點我)👈
如何在 LSIP 使用 explode Sesa2011 如何在 LSIP 使用 explode Youtub11 如何在 LSIP 使用 explode Oiea2011 如何在 LSIP 使用 explode Oe20011 如何在 LSIP 使用 explode Fbi20011 如何在 LSIP 使用 explode Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21077
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88422
威望值 : 16930
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 2018-09-18, 16:40

了解了
謝謝你
WATSON513
WATSON513
一般會員
一般會員

文章總數 : 37
年齡 : 48
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 4716
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
如何在 LSIP 使用 explode Ioaoe110如何在 LSIP 使用 explode 2020-310如何在 LSIP 使用 explode Oiu15010如何在 LSIP 使用 explode 2020-211如何在 LSIP 使用 explode Ia15010如何在 LSIP 使用 explode Aizyao10如何在 LSIP 使用 explode Uos15010如何在 LSIP 使用 explode BPl3tjj如何在 LSIP 使用 explode Ziao1510
如何在 LSIP 使用 explode Oo-2-110如何在 LSIP 使用 explode Zuoiy_10如何在 LSIP 使用 explode Aizyao11如何在 LSIP 使用 explode Iyb_1510如何在 LSIP 使用 explode Aoe1-111如何在 LSIP 使用 explode Uos15011如何在 LSIP 使用 explode Aoe2da10如何在 LSIP 使用 explode Aoe2da11如何在 LSIP 使用 explode Aoe10