分享源码 DCL 幻灯片显示/切换 示例

lxf20190917

分享源码 DCL 幻灯片显示/切换 示例

---

所用工具：1、CAD自带编辑器 VLIDE   2、幻灯片库工具。

功      能：幻灯片的显示/切换

要     求：把文件夹存放在D盘的根目录使用，也可以自己修改代码路径。

说      明：源码只是一个幻灯片切换显示功能，供大家参考，要实现具体功能，要根据自己需求添加即可。

图中幻灯片做成了一个幻灯片库文件，（我的幻灯片库软件过期了，就采用了之前的幻灯片库文件）。

如果要用自己的幻灯片要自己制作幻灯片库。

---

存盘截图：

示意图：

源码：

自己根据需要修改。

crtrccrt

最近几个月,正好研究了一下SLB/SLD的显示/转换/合成/分解/转换为ACAD实体,
其中：
显示是可以在DCL中任意放大/缩小/平移；
转换是看到一些专业软件对SLB动了手脚,如何在正常/异常来回修改；
合成是SLD组合成SLB；
分解是SLB分解成SLD；（可以全部/部分分解）
转换为ACAD实体是SLB/SLD直接生成ACAD实体（一个SLD对应一个图块）（可以全部/部分转换）

程序也是多年前看到论坛上有图库插件，实际使用效果不理想，最近重新自研了一套SLB/SLD组合工具。

实际上，在DCL显示图像，直接使用数据+用vector_image更方便，数据可以组合在LSP中。

.DCL也可以组合在LSP中。

说来惭愧，明经陪伴我廿多年了，自从**年前论坛改规则后，没有独立发帖权，借本贴共享一个思路。

（将nuomi_gz_slb.slb转换为nuomi_gz_slb.dwg）（不贴图片显示了）
（SLD-Reference-英文.pdf）
（SLD-格式-中文.pdf）（经过校对+修改,添加说明）

友情【提醒】各位注意：附件谨慎下载，不靠附件挣明经币，级别不够的，也不要抱怨。

不喜勿喷。不喜勿喷。不喜勿喷。

nuomi_gz_slb.slb中SLD名称：
CB-活动层板圈
CT-横剖抽屉
CT-纵剖抽屉
CTC-纵剖抽屉
CTP-纵剖抽屉
CTW-纵剖抽屉
HP-内插
HP-平钉
HP-外钉
HS-绘制门板
HX-定距等分
HX-定数等分
HX-横向内格
L-L左收口
L-左收口
LMS-上柜
LMX-下柜
M-L中收口
M-中收口
MB-斜扣面板
R-L右收口
R-右收口
S-L上收口
S-上收口
SPS-内插
SPS-平钉
SPS-外钉
SPX-内插
SPX-平钉
SPX-外钉
SX-定距等分
SX-定数等分
SX-竖向内格

lxf20190917

p-3-ianlcc 发表于 2024-2-22 14:59
刚刚重新下载後
运行後正常
是不是要先把nuomi_gz_slb.slb放置的目录先加入acad搜寻的目录路径

文件放到D盘的根目录。

p-3-ianlcc

显示错误，请问是哪里操作有误吗？
指令: GZ1
"损坏的参数类型: stringp nil"
"提示音end"
加密中止

lxf20190917

p-3-ianlcc 发表于 2024-2-22 13:35
显示错误，请问是哪里操作有误吗？
指令: GZ1
"损坏的参数类型: stringp nil"

重新修改了，再下载试一下。

lxf20190917

lxf20190917 发表于 2024-2-22 14:36
重新修改了，再下载试一下。

2. (if (null $dfg:lxf:sys-path$) (setq $dfg:lxf:sys-path$ "D:\\nuomi"))

(if (null $dfg:lxf:sys-path$) (setq $dfg:lxf:sys-path$ "D:\\nuomi"))

p-3-ianlcc

lxf20190917 发表于 2024-2-22 14:39

刚刚重新下载後
运行後正常
是不是要先把nuomi_gz_slb.slb放置的目录先加入acad搜寻的目录路径
对吧！因为我没有加入，图形是没有显示出来

自贡黄明儒

看起来不错，对话框界面设计也很好，先点赞

lxf20190917

lxf20190917 发表于 2024-2-23 10:53
文件放到D盘的根目录。

看上图的文件位置，把解压出来的文件夹“nuomi”，放到D盘根目录。注意：“nuomi”文件夹内是直接所用的文件。

p-3-ianlcc

lxf20190917 发表于 2024-2-23 10:56
看上图的文件位置，把解压出来的文件夹“nuomi”，放到D盘根目录。注意：“nuomi”文件夹内是直接所用的 ...

好的，谢谢你！
我再来试试看