What is the proper syntax for creating a free-standing leader with vla-addleader?
I can't figure out how to supply vla-addleader with a null object.
|
What is the proper syntax for creating a free-standing leader with vla-addleader?
I can't figure out how to supply vla-addleader with a null object.
You must use a Mtext object, AFAIK. Just use a dummy object and delete it....
Code:(setq pt1 (getpoint "\nFirst point: ") pt2 (getpoint pt1 "\nNext point: ") pt3 (getpoint pt2 "\nNext point: ") space (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object))) ) (setq ptlist (apply 'append (list pt1 pt2 pt3))) (setq txtobj (vla-addmtext space (vlax-3d-point pt3) 0 "")) (setq ldrobj (vlax-invoke space 'addleader ptlist txtobj acLineWithArrow)) (vla-delete txtobj)