社区 › AutoLISP/Visual LISP 编程技术 › 简单的自定面板函数

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

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

查看完整版本: 简单的自定面板函数