为何修改标注的文字位置后却无效[求助]

heyong

(setq dtmp (entget(entlast)))
    (setq dz (assoc '11 dtmp))
    (setq dm  (-  (caddr dz)  50))
    (setq new1 (list (car dz) (cadr dz) dm (cadddr dz)))
    (setq dtmp (subst  new1 dz dtmp))
    (entmod dtmp)
我的意图是把线性标注中的文字位置下移50，但修改后无效

Taoyimaier

你得程序我没有调试，只是想了一下，最后是不是要加上一个entupd语句啊，关于这个函数的用法，你看帮助吧，或则用一下(command "regen")语句,先试试吧