[求助]：如何恢复被ESC中断的系统变量？

luzuoji

lisp程序的开始往往要改变系统变量，在程序结束前再恢复过来。但是，如果在程序执行过程中由于esc强行退出，则系统变量就无法恢复了。请问，该如何解决？

ll_j

这就是“出错处理”的部分内容，可以参考我的“Autolisp编程心得”“9.Undo处理”。

luzuoji

最初由 ll_j 发布
[B]这就是“出错处理”的部分内容，可以参考我的“Autolisp编程心得”“9.Undo处理”。 [/B]

我这里所说的“退出”是指在执行lisp语句时的强行退出，例如：
  (setq p0 (getpoint "\n指定第一点："))
按ESC键强制退出。

ll_j

所谓“出错处理”，主要针对ESC中断运行考虑的，毕竟程序经测试后，遇到不可预测的情况少的很，即使遇到，也大多与ESC退出相近，如果出现CAD退出的情况则什么也别谈了。
出错处理，一般就是重新定义“*error*”函数，程序非正常退出时，会自动激活“*error*”函数，只要你在重新定义这个函数时对需要“恢复”的系统变量进行处理，一般不会带来什么“后遗症”。

luzuoji

谢了，你说的很对。