请教如何获取lwpolyline顶点的三维坐标

etoxp · 发表于 2015-8-25 13:18:55

群码10对应的是二维坐标，不含z值。我的lwpolyline是空间任意形状的，不是只在z=0平面上。谢谢！

Gu_xl · 发表于 2015-8-25 15:43:12

加载XLRX_API
(XLRX-Curve-GetStretchPoints ename)

vlisp2012 · 发表于 2015-8-25 21:12:41

笨办法是炸开，再依次获取直线的坐标，再undo

edata · 发表于 2015-8-25 22:33:37

组码38标高决定，点所在高度，就该空间z值，空间由组码210决定。

etoxp · 发表于 2015-8-29 12:58:13

谢谢各位，找到无痕的一个程序，也能实现我的目的。
http://bbs.mjtd.com/thread-109995-1-1.html

，;;46.2 [功能] pline,lwpline点坐标表  By 无痕;;示例(vxs (car (entsel))),返回三维点坐标
(defun vxs (e / i v lst)
  (setq i -1)
  (while
(setq v (vlax-curve-getpointatparam e (setq i (1+ i))))
   (setq lst (cons v lst))
  )
  (reverse lst)
)

etoxp · 发表于 2015-8-29 12:58:54

Gu_xl 发表于 2015-8-25 15:43
加载XLRX_API
(XLRX-Curve-GetStretchPoints ename)

谢谢G版!!!

账号		自动登录	找回密码
密码			注册

[讨论] 请教如何获取lwpolyline顶点的三维坐标