Nested block & entities that belong to a block

How can I know the entities that a block is made of (that's a way to know
even if a block is nested)
Thanks

 

One way:
If you suspect that an object within a block is another block you can list
it with XLIST.

You can use REFEDIT, pick everything in the block and then list everything
in the block.

You can explode a block, list all P(revious) objects, and then undo the
explode.



You are much more capable than you think!

 

Not sure if this is the proper way to handle this
type of thing. If anyone knows a better way,
please share.


; Function to determine if a given object
; is nested in a block/insert definition.
; Arguments:
; [object] - vla-object
; return values: t, nil, or error message
; Example:
;(nestedObject-p (vlax-ename->vla-object (car (nentsel))))
(defun nestedObject-p (object)
(not
(wcmatch
(vla-get-name
(vla-objectidtoobject
(vla-get-document object)
(vla-get-ownerid object)))
"`*Model_Space,`*Paper_Space")) )


Comments anyone?