求帮忙编写vla-explode获得炸碎后取得text文字本修改

yhyqyx · 发表于 2021-6-29 19:09:35

求帮忙编写vla-explode获得炸碎后取得text文字本修改，或者取得lisp图元，能采用entget取得表并修改，谢谢！

nzl1116 · 发表于 2021-6-30 03:23:26

本帖最后由 nzl1116 于 2021-6-30 03:25 编辑

这个方法返回的是变体，只要将变体转安全数组，再转表就可以了。
(vlax-safearray->list (vlax-variant-value (vla-exclode vla-object)))

yjtdkj · 发表于 2021-6-30 12:07:29

那就不要用vla-explode，用下面这个
(vl-cmdf "qaflags" 1 ".explode" ents "" "qaflags" 0)

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

[资源] 求帮忙编写vla-explode获得炸碎后取得text文字本修改