Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Zeitvergleich: Warum geht das nicht (now + DateTimePicker)? (https://www.delphipraxis.net/22887-zeitvergleich-warum-geht-das-nicht-now-datetimepicker.html)

Helmi 25. Mai 2004 17:54


Zeitvergleich: Warum geht das nicht (now + DateTimePicker)?
 
Hallo,

ich habe folgendes Problem:

Der folgende Code funktioniert nicht und ich weiss nicht warum:

Code:
  If now = DateTimePicker_Uhr.Time then
    showmessage('hallo');
Hintergrund-Info:

Die oben stehende If-Anweisung steht in einem OnTimer-Event eines Timers.
Dieser ist vom Intervall her auf 500 ms eingestellt.

Der Timer läuft immer.
Es soll eben eine vorgegebene Zeit mit der aktuellen Systemzeit verglichen werden
und dann etwas auslösen (wie im oberen Fall eine Meldung).

Nur funktioniert die If-Anweisung nicht.

Weiss jemand warum das nicht geht? bzw. was daran verkehrt ist und wie man das
richtig und lauffähig machen kann?

mfg
Helmi

Gollum 25. Mai 2004 17:59

Re: Zeitvergleich: Warum geht das nicht (now + DateTimePick
 
Hallo,

Now und DateTimePicker.Time geben die Zeit auf die Millisekunde genau zurück. Dies wird das Problem für die nicht funktionierende If-Abfrage sein.

Evtl. musst Du den Zeitwert in seine einzelnen Bestandteile zerlegen. Stichwort: DecodeTime.

Helmi 25. Mai 2004 18:08

Re: Zeitvergleich: Warum geht das nicht (now + DateTimePick
 
hallo,

danke für die schnelle Antwort.

ich hab das jetzt so gelöst und so funktionierts auch:

Code:
  If TimeToStr(now) = TimeToStr(DateTimePicker_Uhr.Time) then
    showmessage('hallo');

mfg
Helmi


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz