多个o的命令印记
你好有一个类似Lisp程序的句子：
（定义c:im（）
（命令“_SOLIDEDIT”“B”“I”）
)
但这允许您首先选择实体，然后一次选择多个对象以压印选定实体，并始终在命令结束时删除它们。
或者，更好的方法是，首先一次选择一个或多个实体，然后一次选择其各自面上的所有对象，然后删除所有用于压印的对象（直线、多段线、圆等）。
谢谢并致以最良好的问候。
毫米 没有人 你好，Marco，
您可以使用直接压印代替SOLIDEDIT？
(defun c:im ( / sol ob_imp)
(if
(and
(princ "\nSelect a 3D solid")
(setq sol (ssget "_+.:S" '((0 . "3DSOLID"))))
(setq sol (ssname sol 0))
(princ "\nSelect objects to imprint")
(setq ob_imp (ssget))
)
(repeat (setq n (sslength ob_imp))
(vl-cmdf "_imprint" sol (ssname ob_imp (setq n (1- n))) "_y" "")
)
)
) 你好，Gian Paolo，
Lisp程序很好用！
我使用了很多命令印记，因此对于我来说使用soliedit是很不舒服的。。。身体立即打印并选择每个元素。
谢谢！
再见
马可
页:
[1]