Delphi 按Esc快捷键退出程序的简单方法

本文整理自网络，侵删。

 
1>.设置窗体的keypreview属性为：True；//可以接收键盘操作

2>、在窗体的键盘事件中写：

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if key = #27 then
    application.terminate;     //关闭程序
 end;
 

相关阅读 >>

Delphi pchar和array [0..255] of char的区别

Delphi xe 安卓web开发 错误：net::err_cleartext_not_permitted

Delphi 怎么不注册 dll 就调用 com

Delphi 下载并显示网上的图片

Delphi tstringstream 简单用法

Delphi禁止在android上重复按下按钮

Delphi checklistbox 用法

Delphi禁止tedit, tmemo右键上下文弹出菜单

Delphi fdquery 判断记录为空

Delphi 用正则表达式获取指定的字符串续取出所有符合要求的字符串

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

转载请注明出处：木庄网络博客 » Delphi 按Esc快捷键退出程序的简单方法