Datums-problem

[gangs-taas]

hey,
ich bin es schon wieder ^^
ich hab mal eine frage.
ich wollte das aktuelle datum ermittel und habem ir gedacht das müsste so gehn

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
    Edit1.Text := DateToStr(Weekoftheyear(now));
end;

so funktioiert auch erst einmal ganz gut nur gibt es etwas komisches
in meinem Edit1 Feld steh hinterher '27.01.1900'
obwohl meine system Urh/Datums anzeige das richtige datum anzeigt

ich versteh einfach nicht wo ich schon wieder einen fehler gmeacht hab
und die hilfs/beginnertuturials konnten mir auch nicht helfen ...


ps. ich habe Vista ...

ich hoffe ihr könnt mir helfen ...

[edit=mkinzler]Code-Tag durch Delphi-Tag ersetzt Mfg, mkinzler[/edit]

[DeddyH]

Was glaubst Du, was Dir WeekOfTheYear zurückgibt?

[mkinzler]

Now sollte reichen oder Today

[markus5766h]

Hallo,

Zitat:

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := DateToStr(Weekoftheyear(now));
end;

Du mischt hier zwei Funktionen:
das Datum bekommst Du mit
DateToStr(Now); // als String , die Woche mit
IntToStr(WeekOfTheYear(Now)); // als String

[gangs-taas]

ups tut mir leid


ich merk schon, dass ich zu lange vorm pc saß

*sorry*



und auch vielen dank dafür dass ihr - zrtoz meiner dummen fragen - immer noch antwortet ^^

*danke*