查看单个帖子
旧 2009-04-26, 05:01 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 公差标注和取消的命令

公差标注和取消的命令
www.dimcax.com
公差标注和取消的命令
(defun c:td()
(setq x (getreal "\n 请输入下公差:"))
(command "dimoverride" "dimtm" x "dimtol" "on" "")
)
;---------------------------------------------
;tp ***** to override lower dev. of tol.
(defun c:tp()
(setq x (getreal "\n 请输入上公差:"))
(command "dimoverride" "dimtp" x "dimtol" "on" "")
)
;to ***** to disnable tol.
(defun c:to()
(command "dimoverride" "dimtol" "off" "")
)
将命令复制到相应的lisp文件里就可以了。td是下差,tp是上差,to是取消公差,对称标注将上下的值标成一样就行了。

哦,学学
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)