用户5694667304 发表于 2015-9-30 09:58:28

如何求选择集中图形的坐标角点

如何求选择集中图形的坐标角点,图形是任意图形,并且选择集中图元数量比较多,不低于1000个。麻烦高手能给个思路,要是有代码就更完美了。多谢!!


http://bbs.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 用户5694667304的微博

masterlong 发表于 2015-9-30 10:06:08

选择集的实体外矩形框 by gxl
(defun MJ:GetssBox (ss / i l1 l2 ll ur)
(repeat (setq i (sslength ss))
    (vla-getboundingbox
      (vlax-ename->vla-object (ssname ss (setq i (1- i))))
      'll
      'ur
    )
    (setq l1 (cons (vlax-safearray->list ll) l1)
          l2 (cons (vlax-safearray->list ur) l2)
    )
)
(mapcar '(lambda (a b) (apply 'mapcar (cons a b)))
          '(min max)
          (list l1 l2)
)
)
页: [1]
查看完整版本: 如何求选择集中图形的坐标角点