xlbh
发表于 2008-9-4 21:28:00
谢谢楼主的分享
zctao1966
发表于 2008-11-2 01:30:00
<p>感谢楼主的分享！！！</p>
wenhong_teng
发表于 2009-2-20 00:02:00
谢谢楼主的分享
Jalinnet
发表于 2009-2-22 22:11:00
干什么的呢？下来研究研究，先谢谢楼主。。。
zzxm
发表于 2009-3-27 20:10:00
用了一下感觉太凡锁能否简单一点!谢谢分享!
siiling16
发表于 2009-4-29 20:45:00
頂一下!!!謝謝大大分享!!
zhongys
发表于 2009-6-8 10:43:00
<p> (setq pt1 (getpoint "\n请指定第一角:")<br/> ;pt2 (getpoint "\n请指定另一角:")<br/><font style="BACKGROUND-COLOR: #eeee11;"> pt2 (getcorner pt1 "\n请指定另一角:")</font><br/> )</p><p>对角点如果用到<font style="BACKGROUND-COLOR: #ffff00;">GETCORNER</font>涵数，对于范围选择上会更加直观，捕捉点在原点设定后再归0会少一些繁复操作，</p><p> (setq decimal_sum (read (getkword "\n请输入注解精度<0-8>:"))) ;luyz<br/><font style="BACKGROUND-COLOR: #ffff00;"> (if (= decimal_sum nil) (setq decimal_sum 2))</font><br/> (setq height (getreal "\n请输入标记文本高度<4>:"))<br/><font style="BACKGROUND-COLOR: #ffff00;"> (if (= height nil) (setq height 4))</font></p><p>对于图纸上已设定好的参数不须重复输入。加入默认参数取可</p>
wenmaokun
发表于 2009-6-23 15:04:00
好
sicky111
发表于 2009-12-27 22:52:00
<p>没钱下不了啊。</p>
MJCADLWF
发表于 2010-1-16 00:16:00
好程序下来学习多谢楼主