请教高手,怎样处理ESC

sccat · 发表于 2004-9-17 12:22:00

我的程序需要在按下esc时做一些收尾处理,请问可以怎样做?

meflying · 发表于 2004-9-17 13:13:00

重定义*error*函数...
如:
(defun err(msg)
...
(setq *error* errtmp);恢复原错误处理函数
)
使用,在程序中
(setq errtmp *error*);保留原错误处理函数,以便恢复
(setq *error* err)
当然,在程序最后也要恢复一下,以便在未使用ESC时,也要恢复这个错误处理函数

sccat · 发表于 2004-9-20 13:23:00

多谢，成功了。

请教高手,怎样处理ESC

发表回复

精选推荐