防止关闭windows
来源:互联网 发布:网页编程代码大全 编辑:程序博客网 时间:2024/04/30 14:20
有时候程序在运行当中,不允许别的程序或人为的关闭计算机,除非应用程序知道windows将要退出,其实这样很简单,我们都知道系统将要关闭时,会向每一个程序发送WM_QUERYENDSESSION这条关机消息,只要我们的程序接受到此消息后,做恰当的处理即刻完成我们所需要的。
处理windows消息有好几种,在这里我们利用Application的OnMessage事件,建立响应该事件的过程即可!如下面的例子:
unit unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
procedure AppMessageHandler(var Msg:TMsg; var Handled:Boolean);//声明系统处理消息过程,响应Application的OnMessage事件的过程必须为TMessageEvent类型;
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.AppMessageHandler(var Msg:TMsg; var Handled:Boolean);
begin
if Msg.message=WM_QueryEndSession then//如果收到的消息为关闭计算机的消息时,进行特别处理,因为只是一个例子,我只写出弹出对话框,大家可以根据自己程序的需要进行响应的处理;
begin
if messagedlg('shutdown?',mtconfirmation,mbyesnocancel,0)= mryes then
Handled:=true
else
Handled:=false;
end;
end;
end.
最后在程序的DPR文件中,创建窗体之后但在调用Application.Run前加入
Application.OnMessage:=Form1.AppMessageHandler;即可!
- 防止关闭windows
- 防止关闭Windows
- Windows防止网卡被关闭
- 防止Windows会自行关闭硬盘DMA模式
- Android防止强制关闭应用程序
- JS防止刷新,后退,关闭
- 防止遗忘:windows命令
- 关闭端口,防止病毒与黑客入侵
- 关闭端口,防止病毒与黑客入侵
- 3.7如何防止用户关闭一个视图?
- IE关闭时弹出广告,防止屏蔽
- 关闭硬盘Autorun防止黑客入侵
- 手动关闭电脑端口,防止扫描
- Linux防止防火墙关闭数据库连接方法
- Android之锁屏后,防止服务被关闭
- 【VBA研究】如何防止用户关闭窗体
- CentOS 7 防止端口自动关闭
- 【Windows】如何关闭Windows Defender?
- Delphi使用VB编写的ActiveX控件全攻略
- 抓住机遇 把握方向
- 设置系统时间.
- asp.net开发国际化的程序十个例子
- 初学者。aspx学习日记第1天---faq
- 防止关闭windows
- 一个从EXE、DLL文件中提取、存取图标完整程序
- Download a file from a FTP Server
- XML Schema用法
- C++面向对象特性实现机制的初步分析 Part1
- C++面向对象特性实现机制的初步分析 Part2
- C++面向对象特性实现机制的初步分析 Part3
- 面向构件的手机和笔记本电脑
- 仿照VC.NET的选择行注释宏