咏郡 发表于 2023-9-3 14:37:07

二维 dcl 通用面板

本帖最后由 咏郡 于 2023-9-3 18:36 编辑

打算做个通用的dcl面板对话框，研究了好长时间才做出来了，但经过波总的审阅，说我的太繁琐了，于是给我优化了一下（相当于重新:lol），感觉非常精简还实用。
感谢小波！！
使用方法：（BT-UI-BT tit s）
tit:标题
s：表
例：(setq tit "工具")
      (setq s '(("工具1”（“圆” “c”）（“直线”“l”））（（“标注”“dli”）（“移动”“m”）））
    （BT-UI-BT tit s）
这样就可以调用了，添加和更改命令都比较简单。在次感谢小波
注：我写的示例好多是中文输入，不要复制粘贴。
第一次发贴，请多关照！


咏郡 发表于 2023-9-3 22:29:47

mashanjie 发表于 2023-9-3 19:35
还是这个直观，能直接命令调用，有个问题，怎么增加命令项呢？还望大佬指点

(setq tit "工具")
(setq s '(
("第一列" ("圆" "c") ("直线" "l") ("标注" "dli") ("移动" "m"))
("第二列" ("圆" "c") ("直线" "l") ("标注" "dli") ("移动" "m"))
("第n列" ("圆" "c") ("直线" "l") ("标注" "dli") ("移动" "m"))
))

(BT-UI-BT tit s)

hao3ren 发表于 2023-9-3 17:31:05

通用按键二维面板,小波简化版2023.1.8

咏郡 发表于 2023-9-3 15:58:32

hubeiwdlue 发表于 2023-9-3 15:32
谢谢您的分享，就是可以把很多lisp的命令放到面板里面，防止自己记不住是吧。谢谢您。

刚刚注册，分辨不出来是谁 见谅，大胆猜一下“电饭锅”:lol

664571221 发表于 2023-9-3 14:50:12

为啥不能上个源码呢

hubeiwdlue 发表于 2023-9-3 15:32:40

谢谢您的分享，就是可以把很多lisp的命令放到面板里面，防止自己记不住是吧。谢谢您。

咏郡 发表于 2023-9-3 16:00:01

664571221 发表于 2023-9-3 14:50
为啥不能上个源码呢

这也是能用的，没必要非得源码{:1_1:}

咏郡 发表于 2023-9-3 18:34:10

hao3ren 发表于 2023-9-3 17:31
通用按键二维面板,小波简化版2023.1.8

是破解的？还是知道这个码，来拆台的:D-

咏郡 发表于 2023-9-3 18:37:42

hao3ren 发表于 2023-9-3 17:31
通用按键二维面板,小波简化版2023.1.8

还是贴出来吧，免得都下载你的，不下我的:D-

mashanjie 发表于 2023-9-3 19:35:03

hao3ren 发表于 2023-9-3 17:31
通用按键二维面板,小波简化版2023.1.8

还是这个直观，能直接命令调用，有个问题，怎么增加命令项呢？还望大佬指点:handshake

tigcat 发表于 2023-9-3 22:09:59

(setq tit "工具")
(setq s '(("t1" ("圆" "c") ("直线" "l") ("标注" "dli") ("移动" "m"))))
(BT-UI-BT tit s)
页: [1] 2 3
查看完整版本: 二维 dcl 通用面板