Hi gang,
I've got this routine almost working.
Code:
(vl-load-com)
(defun c:GRDG (/ CLA)
(setq CLA (getvar "CLAYER"))
(command "layer" "m" "L-ANNO TEXT" "c" "1" "L-ANNO TEXT" "")
(Steal "SW Mleader Styles.dwg"'(("Multileader Styles"("SW ML-TXT GRDG"))))
(setvar "CMLEADERSTYLE" "SW ML-TXT GRDG")
(command "_.mleader" "O" "C" "M" "X" (while (> (getvar 'CmdActive) 0) (command pause)))
(setvar "CLAYER" CLA)
(princ)
)
The issue is that when it comes to entering the text, it is happening down at the command line and not at the end of the landing.
Also, even though the content should be MTEXT, it exits the command as soon as I enter a SPACE in the text.
Any guidance is appreciated