Einzelnen Beitrag anzeigen

PASST

Registriert seit: 30. Mär 2005
Ort: Krefeld
325 Beiträge
 
Delphi 7 Enterprise
 
#1

Decodedate(..) und IntToStr(Tag) = 0 >>> Warum?

  Alt 3. Jul 2006, 12:15
Hi NG.

Delphi 4 (update 3)

Ich habe mal wieder ein seltsames Problem.

Ich lese das aktuelle Datum mit DecodeDate() aus und schreibe es nachher als Text für die drei Word-Werte Jahr, Monat und Tag zurück. Allerdings erhalte ich dann für IntToStr(Tag) = 0 und nicht den aktuellen Tag. Das ist unabhängig davon ob heute eine ein- oder zweistellige Tageszahl ist. Der Word-Wert für Tag ist aber richtig. Jahr und Monat werden dabei korrekt konvertiert.
Delphi-Quellcode:
var Jahr, Monat, Tag: Word;
..
DecodeDate(Date, Jahr, Monat, Tag);
.. // hier passiert irgendwas ohne Jahr, Monat, Tag zu berühren
sJahr := IntToStr(Jahr);
sMonat := IntToStr(Monat);
sTag := IntToStr(Tag); // -> = 0
Kann mir jemand helfen?

Gruß
Peter
  Mit Zitat antworten Zitat