“赤兔”出图模块（ZAD 1.0）开源发布
本帖最后由 zh3 于 2024-1-20 20:53 编辑“赤兔”出图模块（ZAD 1.0）使用方法：
1、将目录ZAD存放在D盘根目录下，即D:\ZAD。
2、打开...\AutoCAD 2018\acad.lsp文件，或...\AutoCAD 2018\Support\acad2018.lsp文件，在末尾添加：
(load "D:/ZAD/ZAD.lsp")
;(command "-vbaload" "D:/ZAD/ZAD.dvb")
(command "-vbarun" "D:/ZAD/ZAD.dvb!ThisDrawing.CreateToolBar")
3、重启AutoCAD即可。
功能简介：
本模块基于AutoCAD2018VBA，形态为一个工具条，主打多图框拆图。
设计目地：专为非标设计师打造，最大限度简化、减少工具操作，让设计师精力多花在功能、结构及计算中去。
具体功能简述如下：
1、图框插入：点A4时自动变纵向，点其它自动变横向。
2、放大比例：点一下，图框比例按上图放大一级，直至1:1000，尺寸文字比例随变。
3、缩小比例：点一下，图框比例按上图缩小一级，直至1000:1，尺寸文字比例随变。
4、图框重设：弹出上图，另择框比。
5、整图删除：单击图框，删除整图。
6、整图作废：单击图框，图框画删除线。
7、整图复制：单击图框，复制一份新图。
8、整图移动：单击图框，移动整图。
9、图框对齐：将多个图框排成一线。
10、标题栏拷贝：拷贝标题栏的各项内容（不包括比例、日期等）。
11、统一项目号：统一所有图框中标题栏的项目号文字。
12、统一图号头：适合批量改图。
13、钣金厚度标注：箭头变为小点，内容变为如“δ3”之类。
14、增删直径符号：单击尺寸，增删直径符号Φ。
15、尺寸加括号：变为参考尺寸。
16、粗糙度标注：简化操作，带“其余”的粗糙度自动跑到图框右上角，比例随变。
17、序号标注：随意在不同图框内拉序号，自动归属生成明细表。（明细表填写、导出及汇总功能目前暂不具备）
18、打印预览：单击图框即可打印预览。（也可扩展出批量打印功能，目前暂不具备）
19、快速块：选择图元+单击点，快速成块，无对话框。块名自动（日期+时间+随机数），块色随机。
20、工具条中的单张图纸插入、批量插入、Excel表联动等功能暂不具备。
21、使用者如果想把图框中的公司名称换成自己的，可在模块 GD 中改动 “我的公司名字”，如下：
Public Const CompanyName As String = "我的公司名字"'公司名称
自定义快捷命令说明：
b：快速块，生成块后块自动命名，自动改色
bs: 单击块后自动变色
bw: 单击块后自动生成位置表达块
cs：在块之间拷贝颜色
d: 智能标注
eg: 获取图元信息
x58112051 发表于 2024-1-21 19:18
我在2020里面怎么装不了，这个是不可读的
这个程序是在2018下面开发的，2020下面很可能用不了。 试试，看看，有图布，怎么拆图，多谢分享了，赞一个 大家使用过程中有什么感受欢迎发表评论 拿个首赞
感谢分享 感谢分享:handshake 感谢分享，赞赞赞 感谢分享{:1_1:} 感谢分享，学习了 谢谢分享。
谢谢分享。 我在2020里面怎么装不了，这个是不可读的
页:
[1]
2