Fehler in EncodeDateTime für 24 Uhr

[KPBecker]

Hallo, Delphi-Praktiker,

die Dokumentation schreibt, daß bei EncodeDateTime für Stunde = 24 dann Minute, Sekunde und Millisekunde Null sein müssen, das ist auch plausibel.

Mein Problem: Diese Konstellation führt zu einem Laufzeitfehler:
"... Exception der Klasse EConvertError mit der Meldung '2011.9.20 24:0:0,0' ist keine gültige Datums- und Uhrzeitangabe ...":

Ist das nur bei mir oder nur in dieser Delphi-Version (2010, nicht 2007) so?

Mit besten Grüßen
Klaus-Peter

[guinnes]

Hast du auf einer Digitaluhr schon mal 24:00:00 gesehen ?

[KPBecker]

Hallo, Guiness,

die Frage bezog sich eher nicht auf meine Digitaluhr.
Ich bekomme Datum/Uhrzeit geliefert und möchte es in TDateTime umsetzen.
Laut Delphi-Doku soll 24:00:00 ja auch möglich sein ! (URL="http://docwiki.embarcadero.com/VCL/de/DateUtils.EncodeDateTime"][/URL]

Klaus-Peter

[himitsu]

Auf welche Doku beziehst du dich denn?
Meine D2010-OH meint genau das Selbe wie TDateTime und da seh ich nichts davon.

[edit]
Unverlinkten Link übersehn ... mal sehn ...

Hmmm, EncodeDateTime nutzt intern TryEncodeTime und dort findet man sowas

Delphi-Quellcode:

function TryEncodeTime(Hour, Min, Sec, MSec: Word; out Time: TDateTime): Boolean;
begin
  Result := False;
  if (Hour < HoursPerDay) and (Min < MinsPerHour) and (Sec < SecsPerMin) and (MSec < MSecsPerSec) then
    ...

Also nichts mit 24:00:00:000.
Dann stimmt wohl die OH nicht mehr mit dem Code überein.

[jaenicke]

Das ist ein Fehler in der Dokumentation. Ein schneller Blick in den Quelltext zeigt, dass das explizit abgefangen wird:

Delphi-Quellcode:

  if (Hour < HoursPerDay) and (Min < MinsPerHour) and (Sec < SecsPerMin) and (MSec < MSecsPerSec) then
// wobei HoursPerDay natürlich 24 ist, daher geht nur bis 23

// EDIT:
Das müsste also <= HoursPerDay sein, damit das geht. Das wirst du also schnell selbst berechnen müssen.

@himitsu:
Er hat den Link ja jetzt auch angegeben:

Zitat:

Gültige Stundenwerte liegen zwischen 0 und 24. (Wird 24 als Wert für die Stunden angegeben, müssen die Werte für Minute, Sekunde und Millisekunde Null sein, da der resultierende TDateTime-Wert Mitternacht zum Ende des angegebenen Tages und damit den Anfang des nächsten Tages repräsentiert).

[himitsu]

Jupp, und in Delphi 7 war das auch bereits so ... da stimmt die OH wohl schon eine ganze Weile nicht mehr.

[KPBecker]

Tja, so isses dann halt mal.

Vielen Dank,
Klaus-Peter