阅读下一篇
CAD镜像默认删除原对象;输入g,镜像直接删除原对象 (defun c:g ( ) (princ "\n镜像删除原对象:选择图形") (setq ss (ssget)) (command "mirror" ss "" pause pause"y" ) (princ) ) 将以上代码复制到文本文档后把文本扩展名改为lsp,从CAD工具菜单加载应用程序,选择这个文件,输入“g”即可实现镜像默认删除原对象。当然你也可以降‘’(defun c:g ( )‘’中的‘’g‘’改成任何字母。
回帖成功
经验值 +10
全部回复(0 )
只看楼主 我来说两句抢沙发