delphi监控系统时间

页面导航:首页 > 软件编程 > Delphi > delphi监控系统时间

delphi监控系统时间

来源: 作者: 时间:2016-01-18 15:41 【

当系统时间改变时,如果你要做出反应,你可以处理WM_TimeChange windows 消息以下是例子代码原文:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~If...

当时间改变时,如果你要做出反应,你可以处理WM_TimeChange 消息


以下是例子代码


原文:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
If you need to react when system date time has changed you can handle the WM_TimeChange Windows message.
Here's a sample code:

~~~~~~~~~~~~~~~~~~~~~~~~~
type
   TForm1 = class(TForm)
   private
     procedure WMTimeChange(var Msg: TMessage) ; message WM_TIMECHANGE;
   end;

var
   Form1: TForm1;

implementation
{$R *.DFM}

procedure TForm1.WMTimeChange(var Msg: TMessage) ;
begin
   inherited;
   ShowMessage('Date/Time has changed!') ;
end;
~~~~~~~~~~~~~~~~~~~~~~~~~

 


摘自 一刀日记

Tags:

文章评论

最 近 更 新
热 点 排 行
Js与CSS工具
代码转换工具

<