iCAx开思工具箱

标题: 请高手帮忙 [打印本页]

作者: fei-wang    时间: 2008-12-24 16:52
标题: 请高手帮忙
因为工作上的需要,我要将当前的图形存档并关闭后自动再重新打开它,因为自己的水平不高,试了半天没有办法,只好求高手相助了,这是我自己写的,但达不到目的。
(defun c:MM(/ Filename)
(setq Filename (strcat (getvar "DWGPREFIX")(getvar "DWGNAME")))
(command "zoom" "E")
(command "qsave")
(command "close")
(command "open" Filename)
)




欢迎光临 iCAx开思工具箱 (https://t.icax.org/) Powered by Discuz! X3.3