Zitat von
Balu der Bär:
Wie wärs mit:
Delphi-Quellcode:
case StrToInt(tagg) of
1 : tagg:='Sonntag';
2 : tagg:='Montag';
3 : tagg:='Dienstag';
4 : tagg:='Mittwoch';
5 : tagg:='Donnerstag';
6 : tagg:='Freitag';
7 : tagg:='Samstag';
ens;
Würde nicht klappen, da er vor dem Case noch ein Leerzeichen nach der Zahl anhängt. Aber warum überhaupt von einem Ordinaltyp zu einem String und dann wieder zurück?
Delphi-Quellcode:
case DayofWeek(Yesterday) of
1 : tagg:='Sonntag';
2 : tagg:='Montag';
3 : tagg:='Dienstag';
4 : tagg:='Mittwoch';
5 : tagg:='Donnerstag';
6 : tagg:='Freitag';
7 : tagg:='Samstag';
end;