怎么样实现：当程序出错的时候执行特定程序

xiayuxue213 · 发表于 2017-7-21 11:08:52

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

最近发现程序测试的时候没问题，但在实际用的过程发现有程序执行一半的情况。
比如说我在程序开头设置了关闭了对象捕捉，程序的最后再打开，在执行完程序后对象捕捉有时候是打开的，有时候是关闭的。
我分析应该是程序执行了一半，后面的没变执行。
有没有什么方法能实现:只要程序中断就执行某段特定的程序。

csharp · 发表于 2017-7-21 11:12:20

重定义 *error*

Lispboy · 发表于 2017-7-21 11:48:53

用 error 搜索论坛，看看别人的代码是怎么定义出错处理的。

fangmin723 · 发表于 2017-7-21 13:42:20

本帖最后由 fangmin723 于 2017-7-21 13:46 编辑

(defun c:tt()
      (setq osmbak (getvar "osmode") errbak *error*)
      (setvar "cmdecho" 0)
      (setvar "osmode" 0)
      (defun *error* (msg)
                  (princ "\n")
                  (princ msg)
                  (setvar "cmdecho" cmdbak)
                  (setvar "osmode" osmbak)
                  (setq *error* errbak)
                  (princ)
      )

      …………………………;主程序

      ;;;以下为恢复绘图设置
      (setvar "cmdecho" cmdbak)
      (setvar "osmode" osmbak)
      (setq *error* errbak)
      (princ "\n命令结束")
      (princ)
)

xiayuxue213 · 发表于 2017-7-21 16:23:13

我是菜鸟不知道还有*error*函数非常感谢!

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

[求助] 怎么样实现：当程序出错的时候执行特定程序

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。