[求助]：我也是块的问题---修改块内部的对象

tjchkys

如果一个块中有很多的对象,但我想修改块中的文字,比如注记的文字我想修改一下,但又不想EXPLODE这个块,用程序可以直接修改块中的内容吗?
各位给指点一下!

andyhua5240

refedit，块的在位编辑不行么？
双击块后，点确定？（2000以上的版本）

tjchkys

行啊,不过这样一张图就得处理一次很麻烦!
我想编个程序,自动的处理块就好了!
我只是想知道,怎么样才能得到块里面的对象ID,而且怎么修改,用什么函数呀?

lazybug

;关于块的遍历
(defun c:try ()
    (setq ent (car (entsel "\n选择一个块")));选择“insert”类型
    (setq blk (cdr (assoc 2 (entget ent))))
    (setq e1 (tblsearch "BLOCK" blk))
    (princ "\n")
    (princ e1)
    (setq e1 (cdr (assoc -2 e1)))
    (setq en_data (entget e1))   
    (princ "\n")
    (princ en_data)
    (while (setq e1 (entnext e1))
        (setq en_data (entget e1))
        (princ "\n")
        (princ en_data)
    )
    (princ)
)