Topic: Change Multileader Defined Height

[Jedi Leba]

After digging into this a bit more this seems to work ( AutoCAD 2019 ). I would test it out though. I've 'entmodded' mleaders in the past and get some funky results.

Code - Auto/Visual Lisp: [Select]

1. (defun c:foo (/ s)
2.   ;; RJP » 2019-01-16
3.   ;; Reset mleader textbox height
4.   (if (setq s (ssget ":L" '((0 . "multileader"))))
5.     (foreach e (vl-remove-if 'listp (mapcar 'cadr (ssnamex s)))
6.       (entmod (subst '(44 . 0.0) (assoc 44 (entget e)) (entget e)))
7.     )
8.   )
9.   (princ)
10. )

Yeah, I'm that kind of CAD user who will get unbearably bothered by things that don't really matter that much such as mleader grips that are lower than the actual text box.

You just saved me so much time with your gorgeous routine. Thank you endlessly.

Glad you can use it

My thanks as well - this has bugged me for so long and I just want to let you know how much it is appreciated! Everyone in my office is appreciative as well, it just didn't bug them enough to make them find the solution.