图形最大边界

xyp1964

2. ;; 伪源码
   
3. (defun c:tt ()
   
4.   (if (setq ss (ssget))
   
5.     (xyp-rectang (xyp-get-9pt ss 1) (xyp-get-9pt ss 9))
   
6.   )
   
7.   (princ)
   
8. )
   

;; 伪源码<br /> (defun c:tt ()<br />   (if (setq ss (ssget))<br />     (xyp-rectang (xyp-get-9pt ss 1) (xyp-get-9pt ss 9))<br />   )<br />   (princ)<br /> )<br />

smartstar

学习了，谢谢。

sageman

好东西，值得收藏!

q530496591

不错!logoin 前辈有我想要的功能.虽然我不懂.但能用就行!谢谢.留个印!