在LISP中如何呼叫並執行另一個已載入執行的LISP命令
----------------------------------------------------
(defun c:CALENGTH(/ ss01 oldlay01 en01)
(setvar "cmdecho" 0)
(setq en01 (entsel "\nSelect Object to CAL Layer's: "))
(setq oldlay01 (CDR (assoc 8 (entget (car en01)))))
(setq ss01 (ssget "X" (list (cons 8 oldlay01))));
(COMMAND "CALL" ss01 "")
)
-----------------------------------
如上 CALL 是另一個LISP命令已先載入
(COMMAND "CALL" SS01 "")此行執行後回覆CALL為不明指令
可是CALL單獨執行?正常
問題是出在那呢
請高手幫幫忙謝謝
2026/06/05 此討論區由「協勤CAD討論區」以及「REVIT CLUB討論區」移轉而來，部分早期文章格式、圖片與附件可能有缺漏
若站內搜尋找不到資料，可使用「Google 搜尋本站」查找舊文章；如發現異常，請通知網站管理員。
若站內搜尋找不到資料，可使用「Google 搜尋本站」查找舊文章；如發現異常，請通知網站管理員。