Zeiten vergleichen

[Headi]

hmm... versteh jetzt irgendwie nicht so genau was du meinst.

Also im OnCreate der form1 weise ich DateTimePicker den Wert now zu.
Beim Test dann ändere ich die zeit logischerweise weil ich sonst ca. 23stunden 59 minuten warten müsste.

Weist du was, ich lade mal schnell das Frame hier hoch:

[TStringlist]

Höchstwahrscheinlich liegt es daran, wie du das DateTimePicker1.Time im Creater lädst bzw. es danach einstellst (das ist im Frame ja leider nicht mit dabei). Diese Time-Property des DateTimePickers verhält sich nämlich beim Lesen und Schreiben etwas unterschiedlich. Beim Auslesen gibt sie zwar den gesamten DateTime-Wert zurück, beim Beschreiben allerdings kann man nur den 'Time'-Anteil neu laden. Das könnte also heißen, dass du beim Laden von 'Time' im Creater (oder danach) den Date-Anteil dabei gar nicht mit überladen hast und dieser danach also immer noch einen alten Date-Wert (etwa von Gestern) intus hatte. Bei der Initialisierung dieses Wertes im Creater (oder eben kurz bevor du das testen möchtest) solltest du also auch den 'Date'-Anteil nochmal zusätzlich mit laden:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  DateTimePicker1.Date := NOW;
  DateTimePicker1.Time := RecodeMillisecond(NOW, 0) +5*oneSecond;
end;

Durch diese +5*oneSecond müsste das gewünschte Event dann ca. 5 Sekunden nach dem Ausführen dieser Zeilen eintreten.

Übrigens: Diese Timer arbeiten doch nie so absolut exakt wie sie eigentlich sollten. Es könnte also durchaus mal sein, dass eine Sekunde auch gerade mal schieferweise 1001 Millisekunden lang ist und dann könntest du das Pech haben, dass deine gesuchte Sekunde damit gerade übersprungen wird, also gar nicht abgefragt wird. Ergo, den Timer.Interval-Wert auf etwas weniger als 1000 einstellen, wäre hier wahrscheinlich etwas sicherer.

[Angel4585]

Es gibt doch noch "Time()" oder? Ist das in diesem Fall nicht sinnvoller als "Now"?

Mit einem Timer jede Sekunde zu prüfen ob die Zeit gleich ist find ich im Übrigen nich so das große.. denk mal daran was passiert wenn das Programm rechnet und der Timer dadurch verzögert wird. dann wird die Sekunde vllt. übersprungen und du erhälst nie deine Ausgabe. (Korrigiert mich wenn ich mich täusche)

Was genau willst du in deinem Programm denn erreichen? *nur mal so frag*

[Headi]

Zitat von Angel4585:

Es gibt doch noch "Time()" oder? Ist das in diesem Fall nicht sinnvoller als "Now"?

Mit einem Timer jede Sekunde zu prüfen ob die Zeit gleich ist find ich im Übrigen nich so das große.. denk mal daran was passiert wenn das Programm rechnet und der Timer dadurch verzögert wird. dann wird die Sekunde vllt. übersprungen und du erhälst nie deine Ausgabe. (Korrigiert mich wenn ich mich täusche)

Was genau willst du in deinem Programm denn erreichen? *nur mal so frag*

Es geht darum, den computer zu einer gewissen Zeit herunterzufahren, neu zu starten, ...
Irgendwie muss ich ja die vom Benuzer eingegebene Zeit mit der jetzigen vergleichen, und das kann ich ja wohl fast nur mit einem Timer machen.

Oder wie würdest du das Problem angehen?

@TStringlist:

Vielen vielen dank, es geht jetzt entlich. Hat wohl wirklich am Datum gelegen, was wohl auch der Grund war, warum es im Testprogramm ging und nachher nicht mehr.

Auch allen anderen nochmals vielen dank!

greez headi