欲海猛男 发表于 2010-12-1 18:51:28

程序中途退出捕捉如何还原？

按esc键后程序会出错退出，导致捕捉无法还原回去，怎么办好？

ZZXXQQ 发表于 2010-12-1 21:32:21

自定义错误处理函数*error*进行还原。

qcw911 发表于 2010-12-2 10:19:13

;;初始化函数
(defun ini()
(setvar "cmdecho" 0)
(command "undo" "be")
(setq oldos (getvar "osmode")
        olderror *error*
)
(setvar "osmode" 0)
(setq *error* interror)
)
;;恢复参数函数
(defun reset()
        (setvar "osmode" oldos)
        (setq *error* olderror)
      (princ)
      (command "undo" "e")
        (setvar "cmdecho" 1)
      (princ)
)

bdc770523 发表于 2011-10-27 00:54:47

学习，感谢qcw911
页: [1]
查看完整版本: 程序中途退出捕捉如何还原？