如何得到有拉伸折线的图面坐标

PLgis

对一般的多义线（lwpolyline、polyline），其dxf210的值是默认值（210 0 0 1）。若dxf210的值不是默认值，而是有了拉伸（210 dx dy dz）。在这种情况下，如何得到一条多义线在图面位置处的顶点坐标值？
请各位不吝赐教。

marting

涉及到坐标系的变换了，你从组码得到的顶点用
(trans pt ent 0)  或者 (trans pt zdir 0) 把顶点从对象坐标系变换到WCS坐标系

csharp

最简单方法用 vlax-curve-getpointatparam 获取的就是 WCS 坐标

marting

获得多段线顶点表(WCS)

1. (defun _verts (pl)
   
2.   (setq
   
3.     verts (mapcar '(lambda (x) (trans (cdr x) pl 0))
   
4.                   (vl-remove-if-not
   
5.                     '(lambda (x) (= (car x) 10))
   
6.                     ed
   
7.                   )
   
8.           )
   
9.   )
   
10. )
    

(defun _verts (pl)<br />   (setq<br />     verts (mapcar '(lambda (x) (trans (cdr x) pl 0))<br />                   (vl-remove-if-not<br />                     '(lambda (x) (= (car x) 10))<br />                     ed<br />                   )<br />           )<br />   )<br /> )<br />

PLgis

感谢各位的热心帮助，谢谢