猜想：尺寸关联或者不关联

/db_自贡黄明儒_

猜想:让关联的尺寸不关联，或者让不关联的尺寸自动相关联，也许是有点实际意义的{:soso_e106:}

ll_j

这两个命令是不是你要的？
命令: DIMDISASSOCIATE
选择要解除关联的标注 ...
选择对象: *取消*
命令: DIMREASSOCIATE
选择要重新关联的标注 ...
选择对象或 [解除关联(D)]: *取消*

st788796

CAD对这种关联一般在扩展词典找数据

ysq101

ll_j 发表于 2014-3-25 13:33
这两个命令是不是你要的？
命令: DIMDISASSOCIATE
选择要解除关联的标注 ...

这个我还真不知道呢。。。。又学到一招

另弱弱地问一下：对象追踪  由哪个系统变量控制？？

ll_j

ysq101 发表于 2014-3-25 17:41
这个我还真不知道呢。。。。又学到一招

另弱弱地问一下：对象追踪  由哪个系统变量控制？？

对象追踪？什么意思？看看几个系统变量到底是哪个？

ysq101

ll_j 发表于 2014-3-26 09:46
对象追踪？什么意思？看看几个系统变量到底是哪个？

看到对象追踪了吗？？
不好意思。。刚忘了说是CAD 2004版本了

ll_j

ysq101 发表于 2014-3-26 11:46
看到对象追踪了吗？？
不好意思。。刚忘了说是CAD 2004版本了

查了一下，“对象追踪”按钮全称“对象捕捉追踪”，快捷键的宏很长：

1. ^P$$M=$$(if,$$(and,$$(getvar,autosnap),16),,$$(if,$$(and,$$(getvar,osmode),16384),'_.osmode $$(-,$$(getvar,osmode),16384) ))'_.autosnap $$(if,$$(and,$$(getvar,autosnap),16),$$(-,$$(getvar,autosnap),16),$$(+,$$(getvar,autosnap),16))

复制代码

说起来不复杂，就是设置变量autosnap为16 。

ysq101

ll_j 发表于 2014-3-26 15:33
查了一下，“对象追踪”按钮全称“对象捕捉追踪”，快捷键的宏很长：说起来不复杂，就是设置变量autosnap ...

正是这个变量。。谢谢。。。话说你的那个是什么帮助啊？？

怎么能查得这么详细？？

st788796

ysq101 发表于 2014-3-26 17:42
正是这个变量。。谢谢。。。话说你的那个是什么帮助啊？？

怎么能查得这么详细？？

联机帮助上有很多内容，也要学习高手的学习方法

/db_自贡黄明儒_

;;尺寸关联DIMREASSOCIATE,DIMDISASSOCIATE
(defun C:w1 (/ CODE E EN KEY N P10 P13 P14 SS)
  (cond
    ((setq ss (ssget "X" '((0 . "*DIMENSION"))))
     (initget "dimReassociate dimDisassociate")
     (setq key (getkword "\n尺寸[关联(R)/不关联(D)]:<R>"))
     (cond ((not key) (setq key "dimReassociate")))
     (cond
       ((equal key "dimReassociate")
        (repeat        (setq n (sslength ss))
          (setq e (ssname ss (setq n (1- n))))
          (setq en (entget e))
          (setq code (cdr (assoc 70 en)))         
          (cond
            ((or (equal code 35) (equal code 164))            ;直径，半径
             (setq p10 (cdr (assoc 10 en)))
             (command "_.DIMREASSOCIATE" e "" p10 "")
            )
            ((member code '(32 33 38))
             (setq p13 (cdr (assoc 13 en)))
             (setq p14 (cdr (assoc 14 en)))
             (command "_.DIMREASSOCIATE" e "" p13 p14)
            )
          )
        )
       )
       (T (command "_.DIMDISASSOCIATE" ss ""))
     )
    )
  )
  (princ)
)