只需一步,快速开始
如题
(setq OBJ (entsel "\n选择动态块: ") OBJ (vlax-ename->vla-object (car OBJ)) NAME (vla-get-EffectiveName OBJ))(mapcar '(lambda (X) (vlax-variant-value (vla-get-AllowedValues X)) ) (vlax-invoke OBJ 'GetDynamicBlockProperties))
使用道具 举报
这要试验了。
如果是集合,可以用vlax-for来循环得到内部元素
如果是safearray,有函数(vlax-safearray->list
其间可能还需要(vlax-variant-value 的参与
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2024-11-6 07:22 , Processed in 0.165593 second(s), 26 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.