求教怎样得到一个选择集最大尺寸

zhoufupeng

请问要怎样才能得到我所选的图形的最边的两个点？

psufngah

;;;子程序，求选集是大外形坐标
(defun Min_Max()

(vl-load-cmd)
  (vla-getboundingbox(vlax-ename->vla-object end) 'minp 'maxp)
  (setq minp (vlax-safearray->list minp)
 maxp (vlax-safearray->list maxp))
  (setq minx (car minp)
 maxx (car maxp)
 miny (cadr minp)
 maxy (cadr maxp)))

690994

用VLA-这么简单，学到一招