delphi 如何屏蔽Alt+F4

本文整理自网络，侵删。

 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 判断字符串是否相同

Delphi listbox防止添加重复

Delphi设置dbgrid每列自动居中

Delphi 读取网上的文本文件

Delphi 数组竟然可以这样定义

Delphi cxgrid:动态设计统计功能

Delphi的webbrowser改造，对网页中alter等对话框的改造方法

Delphi启动/停止windows服务,启动类型修改为"自动"

Delphi 过滤所有空格的函数

Delphi把流中的字符串转换为utf格式

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

转载请注明出处：木庄网络博客 » delphi 如何屏蔽Alt+F4