Hopefully this is an easy question...
I have a drawing created a number of years ago by a now out-of-business office. It is being reworked and dimensions/leaders are all ready in place but in some instances I would like to add an extra vertex in a leader. Without erasing and recreating the leader and text, can I simply insert a vertex as if the leader was a polyline?
any help greatly appriecated..
Regards,
Kirk
Here's a little lisp routine that will add as many as you like. For splined leaders it must set them to straight segments first, but they are restored to splines when done.
(defun c:ldr-vtx-add (/ coords n newcoords obj param pt ss test) (vl-load-com) (vla-startundomark (vla-get-activedocument (vlax-get-acad-object))) (while (setq ss (ssget ":S" '((0 . "LEADER")))) (setq obj (vlax-ename->vla-object (ssname ss 0))) (cond ((= (setq test (vla-get-type obj)) 1) (vla-put-type obj 0) (princ "\n....temporarily straightening Leader...") ) ((= test 3) (vla-put-type obj 2) (princ "\n....temporarily straightening Leader...") ) ) (while (setq pt (getpoint "\nNew vertex location: ")) (setq coords (vlax-get obj 'coordinates) param (fix (vlax-curve-getparamatpoint obj (vlax-curve-getclosestpointto obj pt)) ) n -1 newcoords nil ) (while (
Have something to add? Share your thoughts — no account required.
Ask the community — no account required