delphi按下ESC键就退出程序

本文整理自网络，侵删。

 procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=27 then Close();//判断如果按下ESC键就退出程序
end;

end.
 

相关阅读 >>

Delphi 一个定时器timer1相关的简单例子

Delphi 使用tarray.sort对数组排序

Delphi webbroker 上传文件

Delphi api �c multibytetowidechar的用法

Delphi 在目录后面加上一个 "\"

Delphi 判断某个磁盘分区是否存在

Delphi实时监视应用程序内存使用量

Delphi 如何让程序在按了 android 的 back 键后不关闭当前 from 或者不 app 退出

Delphi添加任务栏右键菜单

Delphi 获取image.picture.data的数据

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi按下ESC键就退出程序