如何把ESC键作为快捷键

怎么把ESC键作为快捷键？
如题：
请问怎么把ESC键作为退出系统的快捷?


------解决方案--------------------
在窗口的key事件中，对key进行判断
if key = keyescape! then 
halt close;
return 1
end if
------解决方案--------------------
在keydown事件中
if KeyDown(KeyEscape!) then
close(this)
end if