David Bethel 发表于 2022-7-6 07:08:41

我经常使用它来查找点列表和整体x&y大小的限制：
 

(defun plimits (l)
(setq mnx (apply 'min (mapcar 'car l))
       mxx (apply 'max (mapcar 'car l))
       mny (apply 'min (mapcar 'cadr l))
       mxy (apply 'max (mapcar 'cadr l))
       ysz (- mxy mny)
       xsz (- mxx mnx))
)

 
根据您的需要，您可以将LWPOLYLINE图元中的点值提供给调用：
 
这是一个起点-大卫
页: 1 [2]
查看完整版本: 最大X和负X