vlax-curve-getClosestPointTo 函数求助
测试代码如下:(defun c:test()(setq objen (vlax-ename->vla-object (car (entsel))))
(while (setq pt (getpoint "\n指定点:"))
(setq pt0 (vlax-curve-getClosestPointTo objen pt T))
(princ "\n")
(princ pt0)
(princ "\n")
)
)
本人新手,请教各位大虾,上面的代码问题到底出在哪,
代码本意是想求垂足的时候能够延伸曲线,但在cad2008中测试发现,对于直线和圆弧是正常的。而对于样条曲线与多段线,当指定的点超过其两端点的法线范围时,pt0返回值总是两个端点的坐标,而不是垂足点。 vlax-curve-getFirstDeriv 、vlax-curve-getSecondDeriv 这两个函数也许能满足要求
页:
[1]