Get-Length-Of
Esqueci de postar esta rotina: ; função para calcular o comprimento de linhas(defun get-length-of (ent) (if (setq ent (ename-of ent)) (vlax-curve-getdistatparam ent (vlax-curve-getendparam ent)))) Link(s) da(s) subrotina(s) usada(s):get-length-of, ename-of