好吧问答库 > 您好，看了您回答知友提问了关于lisp在多段线端点画圆的问题，能否请教您如何取得线段（line）的两个端点

您好，看了您回答知友提问了关于lisp在多段线端点画圆的问题，能否请教您如何取得线段（line）的两个端点

根据您的代码：(setq &kw1 (ssget ✀((0 . "LWPOLYLINE"))));选择多段线我把选择的地方改成了LINE，但是我在：(setq #p (mapcar ✀cdr (vl-remove-if ✀(lambda (X) (/= 10 (car x))) (entget &k1))));取得多段线里面的点这段代码里面只能取得线段结速的那个端点，能否告知如何取得线段的两个端点？

2026年09月27日 06:49

有1个网友回答

网友（1）：

(setq &ss1 (mapcar 'cdr (vl-remove-if-not '(lambda (X) (member (car x) '(10 11))) (entget &k1))));获得直线或多段线的端点集合