隐藏+抽屉界面！！（源码）

陈伟 · 发表于 2020-12-9 09:27

本帖最后由陈伟于 2020-12-9 09:35 编辑

压缩包损坏，但是可以用下面方法修复 http://bbs.mjtd.com/forum.php?mo ... hlight=%D0%DE%B8%B4

秋水 · 发表于 2021-1-20 10:16

加个搜索就板扎了

yebaijun · 发表于 2021-2-8 08:57

不错不错不错

cqu20104225 · 发表于 2021-2-20 13:29

下载学习，向分享精神致敬

注册 · 发表于 2021-6-22 08:00

spp_wall 发表于 2018-7-29 09:01
不错不错！！！
但是好像子菜单只是识别字母中文不行！！！

目前试样下来的确如此

whyyshy · 发表于 2021-7-11 18:30

楼主厉害，学习试

行天下 · 发表于 2022-9-28 09:45

谢谢楼主，日常灌水，到此一看

zjfcumt · 发表于 2022-11-7 23:03

虽然我不懂，但是我觉得挺厉害

zmzk · 发表于 2023-1-10 19:49

不能用啊！未知命令“OPENDCL”。按 F1 查看帮助。
未找到对应的"opendcl.x64 .19.arx"文件！程序将退出！

nxchenjk · 发表于 2023-1-17 14:57

二更更二发表于 2019-1-20 18:23
你好，你的LSP文件应该不全吧，我的打开那些展点什么的都没有，只有小工具里的几个英文，并只要改成中文就 ...

(defun fun-str2lst (str sp / str1)
  (cond
((= str nil) nil)
((= sp nil) nil)
((= str "") "")
((= sp "") str)
(t
   (setq str1 (strcat "((\"" str "\"))"))
   (while (vl-string-search sp str1)
   (setq str1 (vl-string-subst "\")(\"" sp str1))
   )
   (apply 'append (read str1))
)
  )
)
子程序换一下。就可以显示汉字了。

账号		自动登录	找回密码
密码			注册

[OpenDCL] 隐藏+抽屉界面！！（源码）