求助以类型选择copy lisp,谢谢!
www.dimcax.com
求助以类型选择copy lisp,谢谢!
输入lisp命令选择文字,再框选范围且只会选种文字复制;
同理输入lisp命令选择尺寸(图元、图块),再框选范围且只会选种尺寸(图元、图块)复制;
(vl-cmdf
"copy"
(ssget (list (cons 0 (cdr (assoc 0 (entget (car (entsel))))))))
""
pause
pause
)
请教楼主为什么我改成以下程式,总运行出错。
(defun c:rr()
(setp a (ssget (list (cons 0 (cdr (assoc 0 (entget (car (entsel)))))))))
(command "copy" a ""))
已调试ok谢谢楼主