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

**PASST**

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.

markieren

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

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

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

Forumregeln