delphi – 防止Windows关闭

发布时间：2020-12-15 09:51:38 所属栏目：大数据来源：网络整理

导读：要检测并防止关机,我使用非常简单的程序.它只有一个表单和一个私有程序,如下所示： TForm3 = class(TForm)private procedure WMQueryEndSession(var Msg : TWMQueryEndSession) ; message WM_QueryEndSession;end; 和实施 procedure TForm3.WMQueryEndSessio

要检测并防止关机,我使用非常简单的程序.它只有一个表单和一个私有程序,如下所示：

TForm3 = class(TForm)
private
  procedure WMQueryEndSession(var Msg : TWMQueryEndSession) ;
         message WM_QueryEndSession;
end;

和实施

procedure TForm3.WMQueryEndSession(var Msg: TWMQueryEndSession);
begin
  Msg.Result := 0; //so I don't want to shutdown while my program is running
end;

我编译了Delphi 5和Delphi 2010.它们都检测到了shutdown.但是当我在Delphi 2010中编译时;在阻止关机后我的程序关闭. (PC没有关机)

如何从两者中获得相同的结果？

解决方法

这看起来像是Delphi中的一个错误.我建议你在Quality Central上发布这个帖子.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!