zhengchuan
发表于 2014-10-16 19:01:39
很好的帖子，仔细学习，慢慢琢磨。
四季因你而在
发表于 2014-10-19 12:19:56
向楼主学习！
caizeping
发表于 2014-11-24 22:56:59
请教G板，对与独立名称空间VLX中的错误要怎么处理？
定义的*ERROR*不能使用。。。
当函数被取消时 各种不能再初始了呀
caizeping
发表于 2014-11-24 23:42:40
(defun c:tt ( / msg)
(setq msg (vl-catch-all-apply 'fun1))
(if (vl-catch-all-error-p msg)
(tt-error (vl-catch-all-error-message msg))
)
)
Throne
发表于 2014-12-3 16:02:23
例四中应该没有
(setq *Function* nil
*UndoMode* nil
)
吧
lionguns
发表于 2014-12-9 00:14:11
留名，新手必修课之一！
wannengazy
发表于 2015-1-17 14:53:17
测试了楼主的c:TT1和C:tt2。
把osmode设置为7，然后执行tt1,输入第三点时按esc，程序结束。在命令行输入(getvar "osmode"),命令
行显示为0.
再次把osmode设置为7，然后执行tt2,输入第三点时按esc，程序结束。在命令行输入(getvar "osmode"),
命令行仍然显示为0.
证明楼主tt2那段定义error的子程序没起作用。
2. (defun *error* (msg)
3. (setvar "cmdecho" cmdecho) ;_ 恢复cmdecho系统变量
4. (setvar "osmode" osmode) ;_ 恢复osmode系统变量
5. (princ "error: ")
6. (princ msg) ;_ 打印错误信息
7. (princ)
8. )
lionguns
发表于 2015-1-19 19:26:53
必学技术.就是出错处理
sutai
发表于 2015-1-20 13:46:41
这个需要仔细学习，我老有某个系统变量楞是复原不了，衰~
li334972660
发表于 2015-2-8 19:39:32
正需要的东西。。顶
页:
1
2
3
4
5
6
[7]
8
9
10
11