[求助]如何遍历块内对象{取得内部对象的名称列表}

yewuqiang · 发表于 2009-1-5 09:50:00

如何遍历块内对象{取得内部对象的名称列表}，块内可能还有块的情况不知道lisp怎么写？请赐教

caoyin · 发表于 2009-1-5 10:00:00

用vlax-for 或 entnext

何谓“对象的名称”？

yewuqiang · 发表于 2009-1-5 10:05:00

对象名称就是画图时cad自动给图元名

caoyin · 发表于 2009-1-5 12:53:00

(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))
)

guankuiwu · 发表于 2022-12-1 15:30:04

这个可以了！

leemyungtaek · 发表于 2023-2-21 05:01:05

这样就把块内对象变成列表了

账号		自动登录	找回密码
密码			注册