Wie wandle ich mikrosekunden in eine Zeit um?

[BBoy]

Ich habe 1475066323000 und das ist ein komplettes Datum das aber in meinem Fall immer nur max. 30 Minuten vom jetzigen entfernt ist.

Dein Beispiel

Code:

DateTime := (myMicroseconds / 1000 * OneMillisecond);

DateTime := Now - (myMicroseconds / 1000 * OneMillisecond);

funktioniert bei mir nicht. Was soll man denn für OneMillisecond eingeben? Für myMicroseconds habe ich meinen wert 1475066323000 verwendet.

[Uwe Raabe]

Zitat von BBoy:

Was soll man denn für OneMillisecond eingeben?

MSecsPerDay (aus Sysutils)

Aber dann wäre die Formel auch falsch. So sollte es dann gehen:
DateTime := myMicroseconds / 1000 / MSecsPerDay;

myMicroSeconds/1000 wandelt in Millisekunden um, das nochmal durch MSecsPerDay dividiert ergibt Tag, was wiederum die Einheit für TDateTime ist.

[DeddyH]

Oder auch so:

Delphi-Quellcode:

const
  MicroSecsPerDay = MSecsPerDay * 1000;

DateTime := myMicroseconds / MicroSecsPerDay;

[BBoy]

Danke euch allen!
Da waren einige richtige Ansätze dabei. Und endlich habe ich es kapiert

[himitsu]

OneMillisecond ist eine neue Konstante in DateUtils und der reziproke Wert von MSecsPerDay.

Also eigentlich eine sinnlos doppelte Konstante, aber halt ob man lieber Multipliziert oder Dividiert.