WindowsMessage bei Tageswechsel?

[Codewalker]

Hallo zusammen.

Gibt es eine Windows-Message wenn jemand

1. Das Datum manuell ändert
2. Mitternacht vorbei geht und dadurch das Datum auf den nächsten Tag wechselt

Ich möchte ungerne mit einem Timer pollen für ein Ereignis das(fast) immer nur einmal pro Tag auftritt.

[himitsu]

1 ja (häng dich einfach mal an TApplicationEvent.OnMessage und schau nach was kommt, oder such im forum danach)
2 natürlich nein (Windows versendet so schon zuviele Messages ... wäre ja Schlimm, wenn es sinnlos auch noch bei jeder Kleinichkeit sowas machen würde, nur in der Hoffnung jemand "könnte" es gebrauchen)

Delphi-Quellcode:

Timer.Intervall := Round((1 - TimeOf(Now)) * MSecsPerDay);
Timer.Enabled := True;

...
OnTimer:
Timer.Enabled := False; // und/oder Intervall setzen
= Mitternacht

Oder wenn man eh einen Timer im Programm hat, der irgendwas regelmäig macht, dann dort mit rein

[Codewalker]

Okay, hab ich befürchtet. Die Rechnung für den Timer ist aber elegant kurz, das hilft schonmal bei Problem 2. Die Message liefere ich noch nach

Bei Änderung von Datum und/oder Uhrzeit kommt: WM_TIMECHANGE = 0x1E (dezimal 30)

[DeddyH]

Übersetzt: "Fensterbotschaft Zeitänderung", das sollte sich schnell im MSDN finden lassen

[edit] Ah, schon selbst gefunden, ich hatte das Edit nicht bemerkt [/edit]