Is possible to not explode a Dynamic Block to get informations?

[Anonymous]

I need to acess The Objects which are part ld a Dynamc Block. I would like to find the vl object names os the lines and so on without using method explode.

[devitg]

Yes . it is possible by the vla

(VL-LOAD-COM)
  (SETQ ACAD-OBJ (VLAX-GET-ACAD-OBJECT)) ;_ el programa ACAD 
  (SETQ ADOC (VLA-GET-ACTIVEDOCUMENT ACAD-OBJ)) ;_ el DWG que esta abierto-
  (SETQ MODEL (VLA-GET-MODELSPACE ADOC))
  (SETQ BLOCK-COLL (VLA-GET-BLOCKS ADOC))


(setq block (vla-Item BLOCK-COLL "blockname"))

Then you can dig on each its COUNT 

or DUMP its property's and method by 

(vlax-dump-Object block t)

[Satish_Rajdev · Accepted solution]

Try this out :-

(defun get:objects (n / l)
  (vlax-for x (vla-get-blocks
		(vla-get-activedocument (vlax-get-acad-object))
	      )
    (if	(eq (strcase (vla-get-name x)) (strcase n))
      (vlax-for	y x
	(setq l (cons y l))
      )
    )
  )
  l
)

Add Block name to this functions like this:

(get:objects "BLOCK NAME")