TDateTime->Integer->TDateTime

[Weazy]

Ich suche eine Möglichkeit ein TDateTime in einen Integer zu konvertieren und umgekehrt. Kann auch in mehrere Integers umgewandelt werden...Weiss jemand wie man das angehen könnte?

[sirius]

Kennst du das Unixzeitformat (da gibt es meines Wissens auch eine Funktion in der DateUtils)

Edit: DateTimeToUnix und UnixToDateTime
Dann hast du einen int64 oder zwei Integer.

[mkinzler]

Eine TDateTime ist ein Double. Den Datumsteil kannst du mit Trunc() extrahieren und die Zeit mit Frac().

Delphi-Quellcode:

datum := Trunc( Stempel);
zeit := Frac( Stempel);

[sirius]

Zitat von mkinzler:

Eine TDateTime ist ein Double. Den Datumsteil kannst du mit Trunc() extrahieren und die Zeit mit Frac().

Frac ergibt aber keinen Integer

[lbccaleb]

Oder du arbeitest mit TFileTime!

[marabu]

Hallo,

deine Anforderungen sind nicht sehr präzise.

Trunc(MSecsPerDay * Now) liefert dir z.B. die aktuelle Zeit in Millisekunden.

Grüße vom marabu

[Weazy]

Wenn das Datum auf die Sekunde genau ist reicht mir das eigentlich. Die Frage ist natürlich wie genau das Datum und die Zeit mit der Trunc/fract methode ist und wie kann ich aus denn beiden Integer werten wieder ein tDateTime bekommen?

Vielleicht sowas wie DateTime:=Date+Time?

[BullsEye]

Zitat von Weazy:

Wenn das Datum auf die Sekunde genau ist reicht mir das eigentlich. Die Frage ist natürlich wie genau das Datum und die Zeit mit der Trunc/fract methode ist und wie kann ich aus denn beiden Integer werten wieder ein tDateTime bekommen?

Vielleicht sowas wie DateTime:=Date+Time?

1. Wie willst du nen DATUM auf die SEKUNDE genau?
2. Erkläre deine Problem ein wenig genauer. BZW wenn du uns sagen würdest, wofür du nen Datum als Integer Wert brauchst, können wir dir ggf auch besser helfen

[Weazy]

Ich schreibe einige Daten welche auch ein Datum (tDateTime) enthalten in eine EasyListView. Jedes Item dieser Liste hat noch ein Property Details, was einfach ein Array von Integers ist. In diese Details schreibe ich zusätzliche Flags, so dass ich die Daten schnell sortieren,grupieren und vor allem durchsuchen kann. Daher muss ich ein DateTime in ein oder mehrere Integers zerlegen und auch wider zusammen setzen können...