明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2407|回复: 6

请教怎么获取动态块自定义数值

[复制链接]
发表于 2009-5-5 11:37:00 | 显示全部楼层 |阅读模式

请教怎么在LISP下获取动态块自定义数值并修改,如下图的“距离”“可见性”和“翻转状态”!

 

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2009-5-5 13:06:00 | 显示全部楼层
VLA有相关函数,参考一下帮助
 楼主| 发表于 2009-5-5 16:18:00 | 显示全部楼层
可是我一个也没找到呀!版主能帮我指明几个函数吗!
发表于 2009-5-5 16:42:00 | 显示全部楼层

没深入研究过,参考vba帮助的 DynamicBlockReferenceProperty 对象

vla-GetDynamicBlockProperties

vla-Get-AllowedValues

 楼主| 发表于 2009-5-5 20:18:00 | 显示全部楼层
谢谢版主,至少现在有个开始了!我好好研究一下!
发表于 2009-5-8 23:19:00 | 显示全部楼层
(cond
   ((= (vla-get-PropertyName X) "引线L")
    (vla-Put-value X (vlax-make-variant dist)) )
   ((= (vla-get-PropertyName X) "引线角度")
    (vla-Put-value X (vlax-make-variant ang)) )
   ((= (vla-get-PropertyName X) "翻转")
    (if QL_isMirr
      (vla-Put-value X (vlax-make-variant 1 2))
      (vla-Put-value X (vlax-make-variant 0 2)) ) )
 )
 楼主| 发表于 2009-8-16 11:33:00 | 显示全部楼层
X 代表什么意思,没看懂  是不是属性块的图元名呀
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-6 03:09 , Processed in 0.193089 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表