Delphi 消息拦截篇 -- 之拦截系统关机、重启、注销

最新推荐文章于 2020-03-14 23:00:36 发布
最新推荐文章于 2020-03-14 23:00:36 发布
阅读量8.8k 收藏 4
点赞数
分类专栏： Delphi 文章标签： delphi forms windows class 测试
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/cwpoint/article/details/6302314
版权
本文介绍了如何在Delphi中拦截系统关机、重启、注销操作，通过三种方法：自定义处理单条消息、利用Application.OnMessage以及自定义窗口函数。重点强调了使用WndProc来拦截WM_QUERYENDSESSION消息，以实现阻止或处理关机事件。同时，文章提到Application.OnMessage无法拦截该消息，并分享了解决过程中遇到的问题。
摘要由CSDN通过智能技术生成

最近做的项目中需要拦截系统关机，因为我在FormCloseQuery中总是把CanClose设为False，不拦截关机的话直接导致系统中的关机、重启、注销都失效了！导致用户不能关机！(提示用户说要关机的话直接按电源^^)这样肯定是不行的！

 

 

要完成这个功能只需要拦截到WM_QUERYENDSESSION消息就万事Ok!

关键在于怎么在Delphi下拦截WM_QUERYENDSESSION消息呢？Delphi也是很强悍的，当然不用直接去SetWindowLong了。

 

 

好了不废话了，博客的第一篇文章就开始啦！

 

 

首先介绍一下Delphi中拦截消息的几种做法

 

 

 

 

第一种：自定义处理单条消息

 

最低0.47元/天 解锁文章
cwpoint
关注
  • 0
    点赞
  • 踩
  • 4
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
专栏目录
Delphi : 使用ApplicationEvents来拦截窗体消息，阻止WebBrowser右键菜单
云中雁012345之成长
02-15 3632
Delphi : 使用ApplicationEvents来拦截窗体消息，阻止WebBrowser右键菜单 (2012-10-25 19:38:35) 标签：  it 分类： 软件_Software     项目需要一些全屏展示的web页面，结果碰到一个问题，当窗体上的webbrowse控件打开了网页之后，窗体就不响应键盘消息了~~~
delphi 快速关机，无等待
从事厨房信息化行业，万能对接所有点餐系统，kds，智能控菜，酒店协调软件
06-20 1168
//申请权限 procedure Get_Shutdown_Privilege;  var      rl: Cardinal;   hToken: Cardinal;     tkp: TOKEN_PRIVILEGES;    begin      OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKE
拦截注销重启关机软件 v1.1
05-04
软件介绍 本程序命令主要拦截电脑进入待机状态，还有电脑的重启、注销、关机的拦截。已阻止过的详细信息，会在【程序主页】的界面里看得到。 适用于下载文件时，人不在电脑机前操作，免长时间未操作，自动进入待机中，中断文件的下载，本程序会自动阻止进入待机状态。 注意：待机不能与关机、重启、注销两个功能同时开启，否则会导致程序自动退出，可临时打开两个程序，这样还能使用一点。 目前一些强制执行关闭计算机的还未能有效拦截，此处还需待更新，敬请期待！ 拦截的时候为什么不能操作，当程序执行拦截关闭计算机时，需要几秒【3到5秒】可恢复正常使用！不会对系统有任何影响。 注意：本软件只在XP系统下测试,能正常拦截成功,其他系统本人未测试过,具体效果还请自己进行测试。
Delphi 消息之拦截篇---拦截系统关机、重启、注销
weixin_30361641的博客
09-28 158
　　最近做的项目中需要拦截系统关机，因为我在FormCloseQuery中总是把CanClose设为False，不拦截关机的话直接导致系统中的关机、重启、注销都失效了！导致用户不能关机！(提示用户说要关机的话直接按电源^^)这样肯定是不行的！ 要完成这个功能只需要拦截到WM_QUERYENDSESSION消息就万事Ok! 　　Windows在关机的时候会想(向)所有顶层窗口广...
Delphi简单实现计算机重启、注销用户和关机.rar
07-09
首先，我们来看"Delphi简单实现计算机重启、注销用户和关机"这个标题所包含的知识点。这表明开发者使用了Delphi的API调用来执行操作系统级别的命令。在Windows系统中，这些操作通常通过调用像`ExitWindowsEx`、`...
delphi-C语言到Delphi的转换器-语言转换.zip
最新发布
02-28
标题中的“delphi-C语言到Delphi的转换器”指的是一个工具或程序，它能够帮助开发者将用C语言编写的代码转换成Delphi语言。在软件开发中，这样的转换可能出于多种原因，如项目迁移、利用Delphi的特定功能或者为了在...
再发一个Delphi重启计算机，关机，注销程序
05-12
摘要:Delphi源码,系统相关,重启,注销,关机　貌似类似的重启计算机，关机，注销程序有很多了，网上一搜索就出来了，呵呵，本着学习的目的，今天再为大家分享一款Delphi关机、注销程序，期待与新人朋友共勉。
delphi-modbus-tcp-indy.7z
05-16
这个"delphi-modbus-tcp-indy.7z"压缩包包含的是用Delphi编写的Modbus TCP组件，它基于两个不同的Indy版本——Indy 9和Indy 10。 Indy（Internet Direct）是Delphi和C++Builder中的一套网络库，提供了一组跨平台的...
Delphi 利用钩子拦截API函数的例子
08-16
Delphi 利用钩子拦截API函数的例子，很经典。
delphi消息处理示例
04-07
本示例主要演示了消息发送，屏蔽等。。。。。。。。。。
不错的delphi课程设计项目-delphi网页邮件抓发系统.rar
04-01
不错的delphi课程设计项目--delphi网页邮件抓发系统 不错的delphi课程设计项目--delphi网页邮件抓发系统 不错的delphi课程设计项目--delphi网页邮件抓发系统 不错的delphi课程设计项目--delphi网页邮件抓发系统 不错...
DELPHI-消息处理机制（三种消息处理方法的比较，如何截断消息）
aishizhuang1602的博客
09-28 308
DELPHI中的消息处理机制 Delphi是Borland公司提供的一种全新的WINDOWS编程开发工具。由于它采用了具有弹性的和可重用的面向对象Pascal(object-orientedpascal)语言，并有强大的数据库引擎(BDE)，快速的代码编译器，同时又提供了众多出色的构件。受到广大编程人员的青睐。在众多的编程语言(如VB，PowerBuilder，Powerpoint等)...
通过消息拦截达到在Delphi控件中屏蔽原有事件处理的一种方法
siow的程序人生
02-10 5055
 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = class(TForm) btn1: TButton;
Delphi中的消息处理
crkres9527
05-19 3191
1、windows的消息驱动体系  　　在windows系统中，消息传递是实现对乡间通信和控制的主要手段。可以额系统都以消息驱动的方式工作。系统中发生的用户输入操作、显示信息的改变、系统环境参数变化等所有时间都以系统定义消息的形式出现在相关的应用程序和窗口。所以程序设计的主要任务就是为这些消息的处理设计代码。 　　在应用程序中，发送者可以通过发送消息要求接收者完成相应的处理。当程序
console控制台应用，关闭事件接收、处理
scimence的专栏
03-14 1731
接收关闭消息，并以log形式输出至文件。 using System; using System.Collections.Generic; using System.Linq; using System.Text; namespace ConsoleTest { class Program { /// <summary> /// ...
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值