画门立面图
本帖最后由 尘缘一生 于 2019-12-31 10:31 编辑提取改写段代码，越弄越觉得没意思，不准备继续了。有兴趣的继续完善吧。它的意义就在于，这种开发的方式、方法，值得掌握。
本坛原帖子链接没找到，是一个外国软件，只支持英文、日语的，提出来画门立面，搞了半天，觉得，这个画门立面作用不大。
补充上幻灯函数
;图形预览对话框处理;==DCL控件写幻灯===================(一级)======================================
;;语法 (SL-Lib-ImageFill img_key slide cobak)
;;img_key 图像控件关键字
;;slide 幻灯片名字
;;cobak 图像控件底色
;;功能：对话框图像初始化
(defun SL-Lib-ImageFill (imgkey slide cobak / x1 y1)
(setq x1(dimx_tile imgkey))
(setq y1(dimy_tile imgkey))
(start_image imgkey)
(fill_image 0 0 x1 y1 cobak)
(slide_image 0 -2 x1 y1 slide)
(end_image)
)
补上幻灯片：
谢谢楼主，好贴标记！ 还有幻灯片文件没上传 其实我觉得没必要这样弄,每个工地用的门款不一样,我的方法是做个动态块 maiko 发表于 2019-12-31 16:12
其实我觉得没必要这样弄,每个工地用的门款不一样,我的方法是做个动态块
动态块当然好，本坛的完整动态块程序代码在哪？这个没那么高级，但是完整的！
页:
[1]