Get list to visibility states of dynamic block

[M. Kubitza]

Is it possible to get a list of all block visibility states, not just the current state?

I have a lisp routine to update titleblock info and it would be nice if each time someone new gets hired, or leaves, only updating the dynamic block would need to be done... and the routine would just grab the list of visibility states and "update itself".

[Ed Jobe]

Are you working with lisp or vba?

[M. Kubitza]

My mistake, working in lisp. Browsing around and forgot which forum I was in.

[MMccall]

Wouldn't this just be a matter of redefining the block via something like design center or a tool palette?

[Tharwat]

Hi,

Please try this:

(if (and (setq blk (car (entsel "\nSelect Dynamic block with Visibility State :")))
         (= (vla-get-isdynamicblock (setq blk (vlax-ename->vla-object blk))) :vlax-true)
    )
  (progn
    (setq props (vlax-invoke blk 'getdynamicblockproperties))
    (foreach prop (vlax-get (car props) 'allowedvalues)
      (print prop)
    )
  )
) (vl-load-com)

[M. Kubitza]

Hi,

Please try this:

(if (and (setq blk (car (entsel "\nSelect Dynamic block with Visibility State :")))
         (= (vla-get-isdynamicblock (setq blk (vlax-ename->vla-object blk))) :vlax-true)
    )
  (progn
    (setq props (vlax-invoke blk 'getdynamicblockproperties))
    (foreach prop (vlax-get (car props) 'allowedvalues)
      (print prop)
    )
  )
) (vl-load-com)

This works perfectly yes.

[Tharwat]

This works perfectly yes.

Good for you.