Unix-Timestamp --> TDateTime

[xAFFE]

Sorry wenn ich diesen Beitrag nochmal rauskrame, aber er findet sich bei Google so gut und stimmt leider nicht.

Die richtige Antwort wäre:

Result = (Trunc((TimeStamp / 60 / 60 / 24) + 25569)) + ((TimeStamp - (Trunc((TimeStamp / 60 / 60 / 24)) * 60 * 60 * 24)) / (24 * 60 * 60));

und anders herum:

Result := ((Trunc(DateTime) - 25569) * 60 * 60 * 24) + Trunc((24 * 60 * 60 * (DateTime - Trunc(DateTime))));

Eventuel kann man das noch etwas vereinfachen.

Die spannendere Frage ist ja eher nach dem wieso und das hat mir auch etwas den Kopf zerbrochen bis ich es rausgefunden hatte.

Das Problem mit der in #3 gennanten Antwort ist, das diese nur für TDateTime-Werte mit 0 Uhr funktioniert. Die Annahme das der Nachkommawert die Anzahl der Sekunden seit Tagesbeginn ist, ist falsch und findet sich aber in vielen Lösungsansätzen im Internet wieder. Der Nachkomma ist der prozentuelle Fortschritt des Tages so ist 0.5(50% des Tages) 12 Uhr oder 0.25(25% des Tages) 6 Uhr ist. Imo ist das nirgendwo so richtig dokummentiert, auch in der Hilfe nicht, ich habe es mir über die Beispiele in der Hilfe zusammengereimt.

Die oben gennanten Lösungen sind bei mir jetzt im Einsatz und liefern endlich zuverlässige Werte. Was nicht beachtet wird sind Zeitzonen, die brauche ich für meine Anwendung nicht, aber das sollte über TTimeZoneInformation.Bias und TTimeZoneInformation.DayLightBias kein Problem sein.

HTH und hoffe es hat sich kein Denkfehler bei mir eingeschlichen.

[angos]

Hi,

ich gehe mal davon aus, dass "25569" aus Antwort 4 dem 1.1.1970 entspricht. Das ist dann aber imho soweit schon korrekt.
Folgendes nutze ich seit Jahren problemlos, was dann der Lösung von SirThornberry entsprechen würde:

Result := EncodeDate(1970, 1, 1) + (UnixDateTime / 86400);

[jfheins]

Zitat von xAFFE:

Sorry wenn ich diesen Beitrag nochmal rauskrame, aber er findet sich bei Google so gut und stimmt leider nicht.
Die richtige Antwort wäre:
[...]
Eventuel kann man das noch etwas vereinfachen.
[...]
Das Problem mit der in #3 gennanten Antwort ist, das diese nur für TDateTime-Werte mit 0 Uhr funktioniert. Die Annahme das der Nachkommawert die Anzahl der Sekunden seit Tagesbeginn ist, ist falsch und findet sich aber in vielen Lösungsansätzen im Internet wieder. Der Nachkomma ist der prozentuelle Fortschritt des Tages so ist 0.5(50% des Tages) 12 Uhr oder 0.25(25% des Tages) 6 Uhr ist. Imo ist das nirgendwo so richtig dokummentiert, auch in der Hilfe nicht, ich habe es mir über die Beispiele in der Hilfe zusammengereimt.

Nachdem ich deine Lösung etwas vereinfacht habe, bin ich bei diesem Code gelandet:

Code:

Timestamp div 86400 + (Timestamp mod 86400) / 86400 + 25569;

Was ziemlich genau dem Code aus #4 entspricht.
Nebenbai wird in #3 ja "DateUtils.UnixToDateTime" empfohlen, das würde mich schon sehr wundern wenn das falsche Werte liefert.

Die Sache mit dem Nachkommaanteil ist in der Hilfe übrigens sehr genau dokumentiert: http://docwiki.embarcadero.com/Libra...stem.TDateTime