请高手完善程序;;;修改标注比例
<p>;;;修改标注比例 <br/>(defun c:DW ()<br/>setq oldscl (getvar "dimscale"))<br/>(progn<br/>(command "dim" "dimscale" pause "Updat"<br/>(princ "\n请选取尺寸来修改 标注全局比例")<br/>pause )<br/>(setvar "dimscale" (getvar oldscl))))</p><p>1.程序执行中并没有出现提示</p><p>2.程序执行后并没有退出DIM</p><p>3..并没有退出DIM</p><p>4.最重要的是没有返回原来的dimscale,</p><p>恳请高手指点迷津!</p> 楼主用这个好了,虽然达不到你的要求,但是还是很实用的 严重谢谢<font face="Verdana" color="#61b713"><strong>AMTONNY</strong><font color="#000000">兄</font></font> 严重谢谢<font color="#61b713" face="Verdana"><strong>AMTONNY</strong><font color="#000000">兄</font></font> 谢谢,BZZ比例很好用 谢谢,BZZ比例很好用
页:
[1]