904772207 发表于 2018-6-2 16:03:34

隐藏+抽屉界面!!(源码)

废话不多说,先看图opendcl
图片
附件

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))
    )
)
)
子程序换一下。就可以显示汉字了。

curugi 发表于 2018-8-17 23:50:47

这个是整面做的啊,明经币整面充值都没找到

awd37 发表于 2018-10-28 08:48:05

怎么联系你?希望共同优化增加功能,
看了另一个类似功能的帖子,发现组合起来就完美了。

1.增加A-z快速搜索侧边隐藏浮动式触发按钮。鼠标滑过触发,检索所有元素,在主界面显示结果,目的是减少键盘的依赖。

2.默认主界面显示频率最高的的30种地物并按a-z排序显示,目的是一个人最多常用的元素也就30种左右,
这样就极大的减少寻找元素的菜单层数,以及按键盘的次数。
3.顶端搜索在鼠标经过激活主界面时,默认获得焦点进入输入状态,目的减少一次鼠标单击和对应的鼠标移动。
   检索支持汉字和首写字母检索,目的减少按键次数。
4.主界面检索结果采用卡片式加文字的方块式显示,和手机主界面图标类似。
   目的,高效直观节省屏幕空间,图片资源cass10里提取即可。
5.此条属于锦上添花功能,太难不能实现也没办法。
   主界面的结果在鼠标掠过时,突出放大1.2倍显示,降低用眼强度降低近视概率。
6.主界面整体采用毛玻璃设计,能略微看清后面的图纸,增加利用率和美观。

7.去除一切不必要元素,减少屏幕占用

laiz3000 发表于 2018-6-10 12:42:48

厉害,学习一下

死神去了 发表于 2018-6-11 07:23:22

楼主厉害,学习试用

yaokui25 发表于 2018-6-11 19:05:56

看上去真的不错,谢谢楼主提供

tianyi1230 发表于 2018-6-16 10:43:08

干净利落,感觉和G版的差不多,不过功能更强大了点!

疯球 发表于 2018-6-16 19:25:18

谢谢分享!!!!!!

杜阳 发表于 2018-6-18 16:24:18

太爽了   支持

xfjiamy 发表于 2018-6-26 14:50:03


楼主厉害,学习试用

xfjiamy 发表于 2018-6-26 19:24:04

楼主,你这个怎么添加命令?

白色微風1991 发表于 2018-6-27 08:09:14

小弟沒有明經市,楼主可以提供,讓小弟學習,謝謝你
页: [1] 2 3 4 5 6 7 8
查看完整版本: 隐藏+抽屉界面!!(源码)