View Full Version : vla-addleader syntax for an unattached leader
pcsyoga
2005-05-02, 03:48 PM
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.
Jeff_M
2005-05-02, 07:43 PM
You must use a Mtext object, AFAIK. Just use a dummy object and delete it....
(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)
pcsyoga
2005-05-02, 08:16 PM
Thanks for your help.
Powered by vBulletin® Version 4.2.5 Copyright © 2025 vBulletin Solutions Inc. All rights reserved.