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

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

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

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

加个搜索就板扎了

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

不错不错不错

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

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

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

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

目前试样下来的确如此

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

楼主厉害，学习试

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

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

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

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

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

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

二更更二 发表于 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))
    )
)
)
子程序换一下。就可以显示汉字了。
页: 1 2 3 4 5 6 [7] 8
查看完整版本: 隐藏+抽屉界面！！（源码）