只需一步,快速开始
可以编辑一个块属性的修改反应器,用英文输入法可以实现,切换为中文输入几个文字,甚至几个英文字母,反应器真是反应不过来了,导致Acad无警告退出! 如下构建反应器函数: (setq a (vlax-ename->vla-object (car (entsel "\n选择一个属性块:")))) (vlr-object-reactor (list a) "" '((:vlr-Subobjmodified . ch))) ;;;构建反应器
(defun ch (x y z) (princ "\n更改!")) ;;写个回调函数
您需要 登录 才可以下载或查看,没有账号?注册
使用道具 举报
试试这样,
(setq a (vlax-ename->vla-object (car (nentsel "\n选择一个属性块:")))) (vlr-object-reactor (list a) "" '((:vlr-modified . ch))) ;;;构建反应器
2楼的写法不能启动修改属性值时的反应器,是编辑块移动等编辑操作时才起作用。
如果对于属性实体来说,修改属性值不是“改变”,那么我的建议有问题,否则就是AutoCAD的BUG,或者你没有好好看代码,点取实体时是NENTSEL,反应器直接监控属性实体而非图块。
用nentsel,不仅更改块属性没反应,倒是可以再选一次,再绑定反应器一次,有反应,不过还是一样,用汉字输入法打入较长的汉字或字母,cad照样无任何信息的退出,应该是反应不过来,回调函数还未运行完时,又一次属性更改已经完成!!
希望大家讨论,找到对策!
当然,我们提到的就是只包含一个反应器!照样会使AutoCAD崩溃!
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2024-9-28 16:23 , Processed in 0.161339 second(s), 25 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.