[求助]多段线上任意一点到起点的长度

sb510212

请教一下怎么在LISP里获得多段线上任意一点（已知坐标）到起点之间多段线的长度？

不死猫

语法

     (vlax-curve-getDistAtPoint curve-obj point)

 

功能

      返回曲线从开始点到指定点的曲线段的长度

　

说明

1）参数 curve-obj 为要测量的 VLA 对象。

2）参数 point 为curve-obj 上的三维点表（在 WCS 中）。

返回值：

若成功则返回实数，否则返回 nil。

范例

假定 splineObj 指向 vlax-curve-getDistAtParam 范例中的样条曲线。

设置 OSNAP 为“切点”并选择直线与曲线相切的点：

_$ (setq getPt (getpoint))

(4.91438 6.04738 0.0)

确定从曲线开始点到选定点的距离：

_$ (vlax-curve-getDistAtPoint splineObj getPt)

5.17769

sb510212

在多段线上也能用吗？

nonsmall

能

露水2

多研究研究vlax-curve---函数 曲线的基本都能搞定

sb510212

多谢!