简单的自定面板函数

yuun · 发表于 2013-1-26 14:47:40

非常感谢~
(if (= (eval (read (strcat "(type c:" tt ")"))) 'SUBR)
               (eval (read (strcat "(c:" tt ")")));
               (vl-cmdf tt)
            )
(vl-cmdf tt)会出现未知命令，如果改成(eval (read (strcat "(c:" tt ")")))才能执行，不知道怎么回事。
(if (= (eval (read (strcat "(type c:" tt ")"))) 'SUBR)
               (eval (read (strcat "(c:" tt ")")));
               (eval (read (strcat "(c:" tt ")")))
            );;;不用if

︶ㄣ与狼共舞 · 发表于 2013-2-27 15:38:14

本帖最后由︶ㄣ与狼共舞于 2013-2-28 08:14 编辑

下载了，不错啊！可以建一个命令面板集合了！跟我现在的工具有冲突哦,我用不了啦.

巨木 · 发表于 2013-4-5 20:55:54

支持老迈！

nedy001 · 发表于 2013-4-8 10:59:24

多谢楼主！万分感谢！终于可以好好整理自己的文件了。

湜１只鱼 · 发表于 2013-5-8 17:46:39

很好很强大

wxytiger · 发表于 2013-5-12 22:20:41

Mark一个，有用。

sicky111 · 发表于 2013-6-7 17:45:00

说到DCL，还是贱人牛。

清风明月名字 · 发表于 2013-6-7 19:06:04

谢谢楼主的分享！收藏备用。

szxgsh · 发表于 2013-6-22 23:12:56

21世纪什么最重要，好人！

清风明月名字 · 发表于 2013-6-23 08:28:01

谢谢楼主的分享！太好用了！收藏备用。

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

[资源] 简单的自定面板函数