Einzelnen Beitrag anzeigen

aMuTeX

Registriert seit: 8. Mai 2003
Ort: Luzern
54 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

Time/Date veränderungen in einem Service feststellen?

  Alt 20. Apr 2006, 11:19
Hallo DP!

Ich möchte in meinem Service feststellen wenn die Systemzeit geändert wurde.
Windows schickt dazu WM_TIMECHANGE. Das Problem ist aber das eine Service Applikation diese Message nicht bekommt.

Delphi-Quellcode:
  TMYService = class(TService)
  private
    ...
    procedure WMTimeChange(var Msg: TMessage); message WM_TIMECHANGE;
  public
    ...
  end;

...

procedure TMYService.WMTimeChange(var Msg: TMessage);
begin
  AddLog('Time changed!');
end;
In einer normalen App läuft das wunderbar, in einem Service aber offenbar nicht.


Gibt es eine andere Möglichkeit das mein Service über ein TimeChange benachrichtigt wird? Oder mache ich einfach etwas falsch?

Besten Dank für die Hilfe.
  Mit Zitat antworten Zitat