TDateTime->Unix Timestamp und vice versa

[3_of_8]

Wie kann ich einen TDateTime Wert in eine Unix Timestamp und zurück verwandeln?

[Thanatos81]

Die OH hilft:

Delphi-Quellcode:

DateTimeToUnix()
UnixToDateTime()

//edit
Ups, hast ja D2k5, sollte es dort aber auch geben, in D7 gibts das auf jeden Fall.

[himitsu]

Geben sollte es zwar sowas, ich denk jedenfalls nicht, daß Borland diese Funktionen ersatzlos gestichen hat ^^

Ansonsten hab ich hier mal die Definitionen der beiden Zeitformate ... damit kannst du ja selber umrechnen ^^

Code:

TDateTime   Double     Number of days since 30.12.1899 00:00
                       01.01.0001 - 31.12.9999 (-693593,99999..2958465,99999)

UnixTime    LargeInt   Number of seconds since 01.01.1970 00:00

[3_of_8]

Ich nehme mittlerweile vorrangig D7 her, denn 2k5 ist mir zu unstable.

[Thanatos81]

Na, dann sollten die Funktionen ja genau das sein, was du suchst ;-)

[3_of_8]

Ja, geht schon. Danke.