Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Datum (DWORD) in lesbares Datum umrechnen (https://www.delphipraxis.net/14041-datum-dword-lesbares-datum-umrechnen.html)

phlux 31. Dez 2003 15:16


Datum (DWORD) in lesbares Datum umrechnen
 
Servus :hi:
Folgendes Problem ereilte mich heute: Ich lese eine bestimmte Datei aus und erhalte einen Wert für das Datum, allerdings wird das Datum in einem DWORD Typ zurückgeliefert. Hab dann versucht mit FormatDateTime das ganze zu konvertieren, was auch klappt allerdings erhalte ich das falsche Datum dafür. Ich geb mal ein Beispiel an:

Code:
DWORD  FormatDateTime  Richtiges Datum
11549   14.08.1931       29.08.2002
Weiß jemand Rat, wie ich das umrechnen kann? :gruebel:

mfg phlux :hi:

mirage228 31. Dez 2003 15:23

Re: Datum (DWORD) in lesbares Datum umrechnen
 
der DWORD Wert ist die Anzahl der Tage seit dem 1.1.1899 soweit ich weiss...

mfG
mirage228

Phantom1 31. Dez 2003 16:09

Re: Datum (DWORD) in lesbares Datum umrechnen
 
nicht bei diesem beispiel, deswegen kommt er ja auf 14.08.1931

Dein DWORD ist die anzahl der tage vom 1.1.1970 ! Wenn du also zu dem DWORD immer die zahl 25948 addierst, kommst du auf das richtige datum!

bsp:
Code:
  Showmessage(Datetostr(11549 + 25948));

phlux 31. Dez 2003 16:13

Re: Datum (DWORD) in lesbares Datum umrechnen
 
Hi!

Jo danke funzt so :thumb:

mfg phlux :hi:


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz