在delphi中怎样实现响应键盘事件

在delphi中怎样实现响应键盘事件，如按下空格键，程序停止运行。最好多举两个例子。