export layer filters

[svorgodne]

Hello everyone,

 

Do u have any idea how to export filter layers from one drawing to a completely new one?

 

I think so far this little routine is collecting all layer filters

(vl-catch-all-apply
  (function 
    (lambda () 
      (vla-item 
        (vla-getextensiondictionary 
          (vla-get-layers 
            (vla-get-activedocument 
              (vlax-get-acad-object)
            )
          )
        )
        "ACAD_LAYERFILTERS"
      )
    )
  )
)

but I don't know how to extract the information from it. Any clue?

 

Thanks in advance

 

 

[ronjonp]

Try this .. the xrecords will be in the list 'r'.

(vlax-for x (vla-item (vla-getextensiondictionary
			(vla-get-layers (vla-get-activedocument (vlax-get-acad-object)))
		      )
		      "ACAD_LAYERFILTERS"
	    )
  (setq r (cons (vlax-vla-object->ename x) r))
)

You can also get them this way .. 3's are the names and 350's are the xrecord.

(dictsearch
  (vlax-vla-object->ename
    (vla-getextensiondictionary (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))))
  )
  "ACAD_LAYERFILTERS"
)

 

[tombu]

gile's lisp allows importing a layer filter from a dwg, dwt, or from a flt file containing a layer filter exported from a drawing: https://forums.augi.com/showthread.php?97438-Can-I-create-frequently-used-layer-filters-in-LISP&p=952247&viewfull=1#post952247