[求助]如何遍历块内对象{取得内部对象的名称列表}
www.dimcax.com
[求助]如何遍历块内对象{取得内部对象的名称列表}如何遍历块内对象{取得内部对象的名称列表}，块内可能还有块的情况不知道lisp怎么写？请赐教
d
用vlax-for 或 entnext
何谓“对象的名称”？
d
对象名称就是画图时cad自动给图元名
d
(setq enlst nil)
(vlax-for x
(vla-item (vla-get-blocks
(vla-get-activedocument (vlax-get-acad-object))
)
blockname
)
(setq enlst (cons (vlax-vla-object->ename x) enlst))
)
d