唉！又卡住了

baozhiliang · 发表于 2002-8-14 12:12:00

为什么选择集带参数就不可以了呢？是不是写法不正确？
(defun delblk()
(setq ck_insert_name_del "A")
(command "erase" (ssget "x" '((0 . "insert")(2 . ck_insert_name_del))) "")
(command "purge" "b" ck_insert_name_del "n")
)
帮忙解决。

mccad · 发表于 2002-8-14 12:30:00

(command "erase" (ssget "X" (list (cons 0 "INSERT)(cons 2 ck_insert_name_del))) "")

龙龙仔 · 发表于 2002-8-14 12:34:00

(defun DELBLK ()
  (setq CK_INSERT_NAME_DEL "A")
  (command "erase"
         (ssget "x"
               (list (CONS 0  "insert") (cons 2 CK_INSERT_NAME_DEL))
         )
         ""
  )
  (command "purge" "b" CK_INSERT_NAME_DEL "n")
)

唉！又卡住了

发表回复

精选推荐

浏览过的版块