本文整理自网络,侵删。
delphi 如何屏蔽Alt+F4
procedure WMSysCommand(var Msg: TMessage);message WM_SYSCOMMAND;
procedure tform1.WMSysCommand(var Msg: TMessage);
begin
if Msg.wParam <> SC_CLOSE then
inherited;
end;
相关阅读 >>
Delphi readprocessmemory 输入进程id 输入读取地址
Delphi android 安卓系统 关闭打开(显示隐藏)输入法
Delphi firedac 下的 sqlite [4] - 创建数据库
Delphi vcl 模式下和firemonkey 模式下的字符串
更多相关阅读请进入《Delphi》频道 >>