您好,欢迎来到[编程问答]网站首页   源码下载   电子书籍   软件下载   专题
当前位置:首页 >> 编程问答 >> Delphi >> 如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?

如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?

来源:网络整理     时间:2016/8/26 19:28:02     关键词:

关于网友提出的“ 如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?”问题疑问,本网通过在网上对“ 如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:

问题: 如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?
描述:

新到一家公司上班,公司要用考勤卡记录员工的上下班的时间,可我有时会忘记打卡,我希望可以在我关机的时候提醒我去打卡。如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?我希望可以由我的程序来控制系统的关机


解决方案1:

easy,就用上面两位老兄的方法,没错的
写个服务也一样啊

解决方案2:

响应主窗体的OnCloseQuery事件,代码:
if messsagedlg('ShutDown',mtinformation,[mbyes,mbno],0)=idyes then
   canclose:=true
else
   canclose:=false;
如果是无窗体程序,应当捕捉WM_QUERYENDSESSION,参考开发人员指南

解决方案3:

关注

解决方案4:

在Form的OnCloseQuery事件中就可以了:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose :=
    Application.MessageBox('Shutdown?', 'ask', MB_OKCANCEL) = ID_OK;
end;


以上介绍了“ 如何截获 Window 2000 的关机消息不让系统执行?或者如何使用钩子是系统收到关机消息执行我得程序?”的问题解答,希望对有需要的网友有所帮助。
本文网址链接:http://www.codes51.com/itwd/3613607.html

相关图片

相关文章