Wykrycie zmiany daty i czasu

Aplikacja korzysta z kalendarza, czyli Now, Date, Time.

W przypadku gdy w ustawieniach regionalnych zmieniany jakis parametr (np separator) to rozsylane sa komunikaty do aplikacji.

Pewnie tez i z czasem jest podobnie. Jak mozna to przechwycic, ze ktos zaingerowal w zegar ?

Ja wygooglowałem ów komunikat oraz zrobiłem tak w swojej aplikacji i działa ok:

//...
  private
    procedure WMTimeChange(var Msg : TMessage); message WM_TIMECHANGE;

// ...

procedure TGlownaForm.WMTimeChange(var Msg : TMessage);
begin
  if SamUstawiamCzasDate = True then
  begin
    Exit;
  end;
  ZmienionoCzasDate := True;
  inherited;
end;