vlax-curve-getDistAtPoint

(vlax-curve-getDistAtPoint krzywa punkt)

Zwraca dugość wzdłuż krzywej od początku do wskazanego punktu.

Jeśli punkt przekazany jako parametr leży na krzywej, funkcja zwraca długość od początku krzywej do punktu, jeśli punkt nie leży na krzywej, funkcja zwraca nil.

Przykład:

(command "_spline" (list 100 50 0 ) (list 145 32 0 ) (list 175 67 0 ) (list 213 43 0 ) "" "" "")
(setq curve (vlax-ename->vla-object (entlast)))
(vlax-curve-getDistAtPoint curve (getpoint "\nWksaż punkt: "))

najprawdopodobniej nie udało mi się trafić dokładnie w splajn, więc  funkcja zwróciła nil.

(vlax-curve-getDistAtPoint curve (osnap (getpoint "\nWksaż punkt: ") "_nea") )

Dociąganie '(osnap...)' do najbliższego "_nea", spowodowało poprawny wynik działania np:69.6834.

Zamiast osnap można też użyć: vlax-curve-getClosestPointTo.