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

[已解決]請問可否用lisp抓取現有的圖層名稱?

上一篇主題 下一篇主題 向下

[已解決]請問可否用lisp抓取現有的圖層名稱?

發表 由 Conquerable 于 2012-08-23, 01:55

請問各位高手

有辦法用lisp的指令抓出現有的所有圖層名稱嗎??

在書中翻許久找不到這指令...

懇請各位幫忙 好棒


Conquerable 在 2012-08-23, 06:50 作了第 2 次修改
avatar
Conquerable
初級會員
初級會員

文章總數 : 45
年齡 : 27
來自 : 新北市板橋區
職業 : 繪圖員
愛好 : 繪圖
個性 : 好動
使用年資 : 12
使用版本 : 2000
積分 : 1
經驗值 : 2133
威望值 : 30
注冊日期 : 2012-07-09
男 雙魚座 馬

回頂端 向下

回復: [已解決]請問可否用lisp抓取現有的圖層名稱?

發表 由 pizg 于 2012-08-23, 05:16

Conquerable 寫到:請問各位高手

有辦法用lisp的指令抓出現有的所有圖層名稱嗎??

在書中翻許久找不到這指令...

懇請各位幫忙 好棒
;;2012-08-23 by PizG
(defun GetAllLayers(/ lst dxf)
(setq lst '())
(setq dxf (tblnext "LAYER" T))
(while dxf
(setq lst (cons (cdr (assoc 2 dxf)) lst))
(setq dxf (tblnext "LAYER"))
)
lst
)
avatar
pizg
高級會員
高級會員

文章總數 : 253
年齡 : 52
來自 : 桃園縣
職業 : 建築設計;程式設計
愛好 : 音樂;攝影;繪畫;棋奕;電腦
個性 : 隨和
使用年資 : 20↑
使用版本 : 2010
積分 : 10
經驗值 : 4029
威望值 : 320
發帖精華 : 1
注冊日期 : 2010-04-16
串連貼紙成功 男 摩羯座 龍

回頂端 向下

回復: [已解決]請問可否用lisp抓取現有的圖層名稱?

發表 由 Conquerable 于 2012-08-23, 06:09

感謝 PizG 大大的指導

已經改寫出需求的LISP了

非常感謝! 超開心
avatar
Conquerable
初級會員
初級會員

文章總數 : 45
年齡 : 27
來自 : 新北市板橋區
職業 : 繪圖員
愛好 : 繪圖
個性 : 好動
使用年資 : 12
使用版本 : 2000
積分 : 1
經驗值 : 2133
威望值 : 30
注冊日期 : 2012-07-09
男 雙魚座 馬

回頂端 向下

上一篇主題 下一篇主題 回頂端


 
這個論壇的權限:
無法 在這個版面回復文章