Zitat von
ferby:
Hallo,
Ich brauche nur das Kürzel des Wochentages, also Mo, Di, etc
Das erhälst du ja durch die Funktion ShortDayNames[DayOfWeek(Kalender.Date)]
Und das hier
Zitat:
'Datum: ' + DateToStr(Kalender.Date) + ' ' + Wochentage[DayOfTheWeek(Kalender.Date)]
kannst du durch die FormatDateTimeFunktion so elegant bekommen:
Delphi-Quellcode:
Label1.Caption := FormatDateTime('"Datum:" dd.mm.yyyy ddd',Kalender.Date);
//-- andere Beispiele für Datumsausgabe:
FormatDateTime('"Datum:" ddd, dd.mm.yyyy' ,Kalender.Date); // Datum: So, 12.08.2007
FormatDateTime('"Datum:" dddd,dd.mmm. yyyy' ,Kalender.Date); // Datum: Sonntag,12.Aug. 2007
FormatDateTime('"Datum:" dddd, dd.mmmm yyyy' ,Kalender.Date); // Datum: Sonntag, 12.August 2007