在关联和上编程
嗨，球童们，我有很多尺寸重叠的图纸。
有人应该让我知道如何通过编程摆脱这个职位吗？
我尝试了一些编码来移动维度的文本，但在关联维度上没有成功。
;|
(MT:Move:DimensionText<-Ename (car (entsel)) nil 0 1 0)
|;
(defun MT:Move:DimensionText<-Ename
(%ename% %absolute|relative% %x% %y% %z% / *entlist* *assoc11*)
(setq *entlist* (entget %ename% '("*")))
(cond
((/= (cdr (assoc 0 *entlist*)) "DIMENSION") nil)
(T
(setq *assoc11* (cdr (assoc 11 *entlist*))); text position
(setq *assoc11*
(if %absolute|relative%
(list %x% %y% %z%)
(list (+ %x% (car *assoc11*)) (+ %y% (cadr *assoc11*)) (+ %z% (caddr *assoc11*)))
)
)
(setq *entlist* (subst (cons 11 *assoc11*) (assoc 11 *entlist*) *entlist*))
(entmod *entlist*)
)
)
)
我不确定%绝对|相对%的意思是什么？
或（acdimenableupdate nil）？
所以我假设t=relocate text&dim，nil=just relocate text？
（MT:Move:DimensionText hanhphuc，
非常感谢你。
我感谢你的好意帮助。 不客气，哈哈，我很高兴你解决了。
页:
[1]