请教高人

thcad · 发表于 2003-3-23 14:42:00

有无办法重定义ESC键, 以使函数能在退出前恢复现场??

lyy · 发表于 2003-3-24 23:02:00

程序里先加入(command "_.undo" "_m")
再重定义*error*函数里加入(command "_.undo" "_b")

thcad · 发表于 2003-3-25 09:38:00

就是在函数中改变的诸如当前图层、捕捉方式等，在退出函数前恢复到之前的状态.
如果用户使用esc键中断函数的话，在函数内无法做成上述事情

chg · 发表于 2003-3-25 10:00:00

这就需要在程序开始记录这些设置，然后再自定义一个错误处理程序，在程序中恢复你要恢复的设置。具体的应用， AUTOCAD自带的LISP程序中有例子。
一般在有需要时才用自定义的错误处理函数，用过后恢复默认的函数。

陈伯雄 · 发表于 2003-3-25 11:05:00

CHG先生的方法是正确的。详细资料参见《Visual LISP程序设计——技巧与范例》第5章第10节[br]。