Multileaders

[teflon]

My Multileaders have an elevation, Z value! Is there a quick way to set the z value to 0?

[DaveM · Accepted solution]

Yes, the flatten command will work.

[teflon]

Thanks!

[teflon]

Good solution but everything got exploded! So they are not annotative multileaders anymore! 

I tested both options "Removing hidden lines"  and not "Removing hidden lines".

I do not understand why the multileaders got the elevation to begin with!

[teflon]

Something like OSNAPZ which could be used afterwards!

[Ajilal.Vijayan]

Try with this code

(defun c:MLZ (/ key alist e n obj pts ss)
  
  ;from http://www.cadtutor.net/forum/showthread.php?30800-Polyline-Vertex-Question&p=198725&viewfull=1#post...
  (defun massoc (key alist / x nlist)
  (foreach x alist
    (if (eq key (car x))
     (progn
	 (setq alist (subst (cons key (list (nth 0 (cdr x))(nth 1 (cdr x)) 0)) x alist))
	 );progn
 );if
  );foreach
  );defun
  
  
  (setq n -1)
  (if (setq ss (ssget ":L" '((0 . "MULTILEADER"))))
    (while (setq e (ssname ss (setq n (1+ n))))
	(entmod (massoc 10 (entget e)))
    );while
  )
  (princ)
);defun

[teflon · Accepted solution]

What I came up with is to make a block of all multileaders and then set the block to z=0 and then explode the block.