[求助]：关于带属性的块

swaywood

请教如何改变带属性块中，属性的位置？
如下图：
F:\block.gif
以下是cad样图

xyp1964

将图块炸开后直接移动！

狂刀

看不到图片，但就你的问题，用夹点移动属性不就可以了么？

舟自横

(defun hy_AlignAtts (Obj Ang / olderror);;;讓屬性塊中屬性文字旋轉一個角度(弧度)
(cond ((= (type Obj) 'ENAME) (SETQ Obj (vlax-ename->vla-object Obj)))
       ((= (type Obj) 'VLA-OBJECT) (SETQ Obj Obj))
       )
  (foreach item (vlax-invoke Obj 'GetAttributes)
    (vla-put-Rotation item Ang)
   )
(vla-update Obj)
(princ)
)
给你一个旋转图块属性的程序..相信
要移动你依葫芦画瓢总会吧??
呵呵..自己也可以动以下脑筋啊..