QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
6天前
楼主: woaishuijia
收起左侧

[原创] 极限与配合公差标注程序(31楼,46楼更新)

[复制链接]
 楼主| 发表于 2012-3-22 13:24:09 | 显示全部楼层 来自: 中国辽宁
LS能说得具体一点吗?
 楼主| 发表于 2012-3-23 11:07:33 | 显示全部楼层 来自: 中国辽宁
24# 未济
) ^2 S; h2 i( J时间不太充足,等几天吧
发表于 2012-3-23 11:15:43 | 显示全部楼层 来自: 中国青海西宁
lz就是安装完成后显示的不是你所说的那个界面
发表于 2012-3-23 11:43:36 | 显示全部楼层 来自: 中国青海西宁
LZ就是安装路径的问题,什么是支持CAD搜索的路径啊?
 楼主| 发表于 2012-3-24 14:02:08 | 显示全部楼层 来自: 中国辽宁
29# zhuguiping 6 U1 [8 X$ v- g  Q! E
到"选项"对话框上去找
 楼主| 发表于 2012-3-24 14:03:25 | 显示全部楼层 来自: 中国辽宁
本帖最后由 woaishuijia 于 2012-3-24 15:05 编辑 + D7 b; K5 D* D0 E9 F, H$ D! N' e
2 f( r9 g- a) j# ]2 \0 x6 v$ q
本帖附件为更新后的程序,与一楼附件相比主要有以下几点改进:
( {0 |% T; o  M$ N) B) u' y一.按照18楼wsj249201朋友的建议,在LSP引导程序中使用了完整的宏名称;/ Z# e. @4 R$ R: [( W3 `' _! j& P
二.按照24楼未济朋友的建议:
& d& m: M" x3 r3 c) y' X    1.增加了对坐标标注的支持;
# e2 J, [: L0 @    2.对于上下偏差值不相等的极限偏差,上下偏差值相等的对称偏差和公差代号,可以分别设置字体高度因子;! J- H4 t1 s, V$ A  f5 ]" {) t$ @' B
    3.增加了下拉列表框和字体高度文本框对鼠标滚轮的支持.0 L' s" e1 ?2 W7 u' `* p
三.增加了配合标注的非堆叠样式;
- u: \% D* Y& m1 r# T! M四.程序使用后,可以自动保存对字体高度因子的设置,下次使用程序时沿用上一次的字高.文件名为"公差与配合.txt",保存在工程文件同一个路径下(不要擅自修改,以免程序运行时出错).& c5 A& B; O* w. U& [* E
五.纠正了一楼附件中的一处BUG." l: H1 S9 K$ |1 P. D/ }9 ~
! C: Y) {7 C3 J7 @0 r# C0 V
使用方法:
: _( V7 u. I' [) [- R# I" ^; _一.下载解压附件到CAD支持文件搜索路径下.5 Z- Z! ?1 G/ ]
    如果"公差与配合.dvb"文件未放到CAD支持文件搜索路径下,则需要修改其中的"gc.lsp"文件.方法是:% D2 K3 Z  Y$ }4 r/ k; B
    用Windows记事本打开"gc.lsp"文件.对第三行
  1. (vl-vbarun "公差与配合.dvb!Thisdrawing.gc" )/ P% g6 t; L$ f9 ^
复制代码
按照"公差与配合.dvb"文件的实际路径修改,例如
  1. (vl-vbarun "f:\\CAD二次开发\\公差与配合.dvb!Thisdrawing.gc" )
    * g9 g" u9 r1 n
复制代码
注意:与电脑中通常的文件路径格式不同,反斜杠"\"要两个当成一个用,一定要成对,缺一不可.3 t/ q. ]9 u0 G( F% f
二.使用前,在打开的CAD文档中加载"gc.lsp"文件("工具"菜单下的"加载应用程序"或命令行键入"appload"命令), e9 q' _0 Y" m; I
三.使用时,命令行键入"gc"命令,确定后命令行会出现提示"选择直径,转角,对齐或坐标标注:",选择现有的标注后会弹出下面的对话框0 j4 m7 i) S5 e! @
Untitled-1.gif
3 e7 G/ G: S; x: J% i) y: C/ ~% r7 X: `3 v5 m3 t/ C$ J! v8 d
    如果需要改用其它命令引导本程序,可以通过修改"gc.lsp"文件实现.方法是:按自己的需要修改其中的第一行
  1. (defun c:gc ()
复制代码
把其中的"gc"改成其它文字.例如
  1. (defun c:aaa ()
复制代码
就可以在CAD命令行用"aaa"命令引用本程序.
$ b0 w* J% _6 N& D1 K; p1 t- g: Q四.在对话框上,可以在用鼠标点开下拉列表框后,用鼠标滚轮操作列表上下滚动;也可在用鼠标点击字体高度文本框或其右侧的滚动条后,用鼠标滚轮改变字体高度因子.1 b1 T! P! C6 y3 h& `7 h3 ~
    其它使用方法可以自行尝试或参考一楼的说明.
3 c. E, a2 |, U6 t  g& P    欢迎朋友们继续提出宝贵意见.

公差与配合.rar

97.57 KB, 下载次数: 114

评分

参与人数 1三维币 +20 收起 理由
唐昕晨 + 20

查看全部评分

发表于 2012-3-25 18:06:04 | 显示全部楼层 来自: 中国广东肇庆
试了,谢谢,有以下几个问题:
# r7 q- S5 u; w& f$ }, H1.半径标注不能标公差;
) D* g0 l( Y! w" [2.高度因子不能用键盘输入;& a3 I$ e* y) J( l. m& @
3.相同公差等级的几个尺寸不能同时标公差.
发表于 2012-3-28 17:47:07 | 显示全部楼层 来自: 中国广东肇庆
谢谢,可否增加非公差表的标注?5 p' P9 D6 _7 x* x# m' p
如:+0.05到-0.02,这样的公差
发表于 2012-3-29 15:08:22 | 显示全部楼层 来自: 中国上海
33楼,你想让楼主发疯吗?
* N, L) ]+ q/ ~$ p7 F直接用ed命令,选想加公差的标注,想加什么公差值就怎么加,火星公差也能标。
发表于 2012-3-29 15:09:44 | 显示全部楼层 来自: 中国江西鹰潭
非常好的小工具,十分感谢啊。
发表于 2012-3-31 18:03:27 | 显示全部楼层 来自: 中国广东肇庆
33楼,你想让楼主发疯吗?/ G( A1 i; Q/ F+ h: ^# J) P
直接用ed命令,选想加公差的标注,想加什么公差值就怎么加,火星公差也能标。" D6 T$ q0 M6 H& v. X7 ]
zyzxct 发表于 2012-3-29 15:08 http://www.3dportal.cn/discuz/images/common/back.gif
! C; U- j; e) d5 r/ K
现在要用三种以上的公差插件才能有效率
发表于 2012-3-31 20:32:04 | 显示全部楼层 来自: 中国青海西宁
未命名.jpg
, |! y7 }/ E- F1 _楼主这就是我加载完后输入GC命令后出现的界面,帮忙看看怎么回事,是哪里加载的有问题吗?谢谢
发表于 2012-4-4 09:45:23 | 显示全部楼层 来自: 中国广东肇庆
是不是你有多个插件,造成冲突,用了你以前的插件
发表于 2012-4-6 21:11:49 | 显示全部楼层 来自: 中国青海西宁
cad是2007版的没有安装过其他插件啊
发表于 2012-4-23 08:39:50 | 显示全部楼层 来自: 中国上海
可否移植到SolidWorks软件里,在SolidWorks生成工程图时很需要这种工具。我用的是2007版。
发表于 2012-4-23 11:05:11 | 显示全部楼层 来自: 中国广东珠海
谢谢分享!正在找这样的工具。
发表于 2012-5-11 06:42:59 | 显示全部楼层 来自: 中国福建泉州
为什么字体高度可以滚动鼠标,而下拉列表却无效呢?!我用的是AutoCAD2006、XPSP3
发表于 2012-5-11 07:35:10 | 显示全部楼层 来自: 中国辽宁丹东
挺好的,但还有优化的空间。努力!
发表于 2012-5-19 15:53:00 | 显示全部楼层 来自: 中国湖北武汉
提示没有找到宏?1 Z" ~6 {3 [+ _6 O
为什么?请教高人!
 楼主| 发表于 2012-5-19 19:26:16 | 显示全部楼层 来自: 中国辽宁
44# lang581314 0 o8 x0 D$ r* q" h1 k2 ~; \
支持路径的问题.( ]# W8 ^4 Q: l4 v# Q4 x! t
要么在LSP文件中使用全路径,要么在CAD选项中把dvb文件所在目录设为支持路径.
 楼主| 发表于 2012-8-24 09:58:41 | 显示全部楼层 来自: 中国辽宁
更新.
9 X8 |6 Z) p6 p& _- r9 ^) L0 j支持先选择后执行.使用方法参见1楼和31楼6 H4 g" H7 K7 F) `" J8 t

公差与配合.rar

101.43 KB, 下载次数: 104

发表于 2012-9-26 20:58:30 | 显示全部楼层 来自: 中国北京
我试了一下,真好用
发表于 2012-10-14 22:25:01 | 显示全部楼层 来自: 中国福建福州
可以用在2013里吗
; M! n1 Q  @7 n5 E: \( D
 楼主| 发表于 2012-10-15 01:02:53 | 显示全部楼层 来自: 中国辽宁
cx0527 发表于 2012-10-14 22:25 static/image/common/back.gif' o& K  D; g& P  z! x
可以用在2013里吗

4 K1 j+ V& R# j/ p1 l% K: g: M可以,前提是安装了VBA模块
发表于 2012-11-15 18:14:45 | 显示全部楼层 来自: 中国广东肇庆
老大,增加半径标注啦
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表