topic Re: List of Layers in Visual LISP, AutoLISP and General Customization Forum

List of Layers

kpennell — Fri, 01 Feb 2019 13:02:00 GMT

I'm just trying to get a list of layers in a drawing to a variable, that I can manipulate and perform layer commands.

I thought (laylist) or (layerlist) functions that have been created would work, or vla-get-layers would work, but I'm not able to get the returned info to a list format.

Re: List of Layers

rkmcswain — Fri, 01 Feb 2019 13:12:24 GMT

Here is a nice short function to do that.

Re: List of Layers

ВeekeeCZ — Fri, 01 Feb 2019 13:20:18 GMT

Or your vla-get-layers

(vlax-for l (vla-get-layers doc)
    (setq layers (cons (vla-get-name l) layers)))

Re: List of Layers

rkmcswain — Fri, 01 Feb 2019 13:31:11 GMT

@ВeekeeCZ wrote:
(vlax-for l (vla-get-layers doc)
(setq layers (cons (vla-get-name l) layers)))

You're missing something there. "doc" is undefined.

Re: List of Layers

DannyNL — Fri, 01 Feb 2019 13:32:42 GMT

Or in your function LayerList and returns a sorted layer list

(defun LayerList (/ LL_Return)
   (vl-sort
      (vlax-for LL_Item  (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object)))
         (setq LL_Return (cons (vla-get-Name LL_Item) LL_Return))      
      )
      '<   
   )        
)

Re: List of Layers

kpennell — Fri, 01 Feb 2019 13:34:14 GMT

This one seems to do the trick. Thanks all for the suggestions, benefits my, and everyone's learning.

Re: List of Layers

ВeekeeCZ — Fri, 01 Feb 2019 13:41:23 GMT

Of course, I am. And we all know that... Or if the OP don't, it's just a little motivation to look into help and explore things himself.

Re: List of Layers

scot-65 — Fri, 01 Feb 2019 23:20:58 GMT

And one more... all together now:

;layer list [no xref or bounded xref names]
(vlax-for x (vla-get-layers *DOC*)
(if (not (wcmatch (vla-get-name x) "*|*,*$#$*"))
(setq la (cons (vla-get-name x) la))))
(setq la (vl-sort la '<))

???