20230305更 自动生成图库程序--智能IMAGE面板制作图块打包

wzg356

该程序大变样，今是昨非，已另开新帖http://bbs.mjtd.com/thread-187372-1-1.html发布



多个选择集对象自动生成image面板 图块源对象也可打包进程序，点击按钮可插入打包图块
c:imgtool点选矩形框圈围选择对象，一个矩形框圈围一个选择集，一个选择集一个按钮
c:sss2fas两点框选对象，一次框选生成一个选择集，一个选择集一个按钮

20230505更
生成的面板按钮可选，即把不常用的隐藏，点击设置面板二维码即可进入功能勾选
优化图块打包数据采集

20220924更新
代码整理优化，运行速度有所提升，修复一些小bug

20220914更新
        增加插入图块的比例、插入点参数
        本次优化后生成的程序运行速度更快

     提醒：imgtool工具程序及生成的程序均为fas文件
              非注册版仅可  生成image面板
              图块打包插入功能需注册

这两个代码是这个工具程序（老版本）生成的
http://bbs.mjtd.com/thread-185841-1-1.html
http://bbs.mjtd.com/thread-185837-1-1.html
=========其他的看以下原帖============================
建议在64位系统运行imgto0l工具

可适用:
LINE,*OLYLINE,SPLINE,CIRCLE,ARC,ELLIPSE,*TEXT
DIMENSION,ATTDEF,HATCH,LEADER,MULTILEADER
及其组成的INSERT对象
打包并(或仅)制作相应IMAGE面板

打包对象的字体/线型/填充图案应适用各CAD版本
打包前应对文字样式/标注样式等整理简化
按钮图案对象须用矩形框圈定
--
实现图块打包、图标、image面板DIY一体化,操作简单

image面板智能化
image按钮大小、排列、底色参数化设置自由可调
按钮图标/底色在黑白色自适应调整
按钮大小、排列自动计算限定值，列表化推荐参数设置
实现横/竖工具条、面板等使用形式并记忆停靠位置


以下图片上传顺序不妥，按11-22-33-44-55顺序有下至上看

depgfdepgf

(LOAD "C:/Users/Administrator.PC-20161113UJPX/Desktop/imgtool生成的程序样品/智能IMAGE面板制作图块打包v8.fas") (defun ListDumpAtom (Lst)
(if Lst (cons (car Lst) (ListDumpAtom (vl-remove (car Lst) (cdr Lst)))))
)
; 错误: 参数类型错误: streamp nil

wzg356

depgfdepgf 发表于 2021-12-31 21:08
(LOAD "C:/Users/Administrator.PC-20161113UJPX/Desktop/imgtool生成的程序样品/智能IMAGE面板制作图块打 ...

不明白啥情况

wzg356

1006015131 发表于 2022-1-4 15:12
浩辰cad打开就崩溃。。。

抱歉，浩辰cad没接触过。据说浩辰cad没有完全兼容autocad的fas指令

daixq021

坐板凳，怎么没有人看呢

999999

感谢大师的分享，这种是不是类似图库呀

wzg356

999999 发表于 2022-1-1 09:22
感谢大师的分享，这种是不是类似图库呀

就是，DIY图块、面板一体化

spp_wall

支持支持！！！！！！！！！

流浪的军刀

先支持再说！！

1006015131

下来看看 导出的不知道会不会很长

1006015131

浩辰cad打开就崩溃。。。