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

markieren

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*

Datums-problem

Datums-problem

Re: Datums-problem

Re: Datums-problem

Re: Datums-problem

Re: Datums-problem

Forumregeln

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.624 Beiträge Delphi 12 Athens	#2 Re: Datums-problem 10. Jul 2009, 14:57 Was glaubst Du, was Dir WeekOfTheYear zurückgibt? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.858 Beiträge Delphi 11 Alexandria	#3 Re: Datums-problem 10. Jul 2009, 15:00 Now sollte reichen oder Today Markus Kinzler
	Zitat

markus5766h Registriert seit: 5. Mär 2009 Ort: Hamburg 569 Beiträge Delphi XE8 Professional	#4 Re: Datums-problem 10. Jul 2009, 15:06 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 Markus H.
	Zitat

gangs-taas Registriert seit: 24. Mär 2009 364 Beiträge	#5 Re: Datums-problem 10. Jul 2009, 15:17 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
	Zitat