以下是用Lisp编写的获取LWPOLYLINE和POLYLINE顶点坐标的代码示例:
(defun get-polyline-vertices (entity)
(if (and (member (cdr (
本文提供了一段Lisp代码,用于获取AutoCAD中的LWPOLYLINE和POLYLINE实体顶点坐标。代码包括两个函数,分别用于获取单个实体和按图层批量获取顶点坐标。使用者只需指定图层名,即可得到该图层上所有LWPOLYLINE和POLYLINE的顶点坐标列表。
以下是用Lisp编写的获取LWPOLYLINE和POLYLINE顶点坐标的代码示例:
(defun get-polyline-vertices (entity)
(if (and (member (cdr (
6474

被折叠的 条评论
为什么被折叠?