求教各位大神、如何删除块内属性

xiaocainiao

2. (defun c:bbE (/ en)
   
3.   (vl-load-com)
   
4.   (while (setq en(car(nentsel "\n拾取块内图元:<退出>" )))
   
5.     (vla-delete(vlax-ename->vla-object en))
   
6.     (entupd en)
   
7.     (command "regen")
   
8.   )
   
9.   (princ)
   
10. )

(defun c:bbE (/ en)<br />   (vl-load-com)<br />   (while (setq en(car(nentsel "\n拾取块内图元:<退出>" )))<br />     (vla-delete(vlax-ename->vla-object en))<br />     (entupd en)<br />     (command "regen")<br />   )<br />   (princ)<br /> )

求教一下各位大神、如何删除块内的属性、删除后所有同名块中的相同属性都被删除、
用上面的代码删除后、其他同名块中的属性还在

自贡黄明儒

属性有点像狗皮膏药，附在块上的。想全部删除，遍历吧。

xiaocainiao

自贡黄明儒 发表于 2022-7-27 17:40
属性有点像狗皮膏药，附在块上的。想全部删除，遍历吧。

难道就没有别的办法了吗、这个属性确实有点蛋疼

荣sir

现有的属性块增删属性，需要用快捷指令atts更新这个属性块，这样其他同名块就同步了

xiaocainiao

荣sir 发表于 2022-7-28 12:25
现有的属性块增删属性，需要用快捷指令atts更新这个属性块，这样其他同名块就同步了

我用上面的代码试了、删完以后再同步也没用、不知道啥原因

李钊伟2012

改为空值？ 求问如何获取所有的属性标记和值？