Case...of und Ordinal-Typ-Fehler?

[Bastler]

Hallo zusammen;

Folgendes Problem:

Delphi-Quellcode:

procedure TForm1.bersichtWoche1Click(Sender: TObject);
var k:integer;
    tagg,tagh,tagm:string;

begin
tagg:=inttostr(DayofWeek(Yesterday));
tagg:=tagg+' ';

case tagg of
'1 '  : tagg:='Sonntag';
'2 '  : tagg:='Montag';
'3 '  : tagg:='Dienstag';
'4 '  : tagg:='Mittwoch';
'5 '  : tagg:='Donnerstag';
'6 '  : tagg:='Freitag';
'7 '  : tagg:='Samstag';
ens;
Panel2.caption:=tagg;

tagh:=inttostr(DayofWeek(now));
case tagh of
'1 '  : tagg:='Sonntag';
'2 '  : tagg:='Montag';
'3 '  : tagg:='Dienstag';
'4 '  : tagg:='Mittwoch';
'5 '  : tagg:='Donnerstag';
'6 '  : tagg:='Freitag';
'7 '  : tagg:='Samstag';
ens;
Panel3.caption:=tagg;

tagm:=inttostr(DayofWeek(Tomorrow));
case tagm of
'1 '  : tagg:='Sonntag';
'2 '  : tagg:='Montag';
'3 '  : tagg:='Dienstag';
'4 '  : tagg:='Mittwoch';
'5 '  : tagg:='Donnerstag';
'6 '  : tagg:='Freitag';
'7 '  : tagg:='Samstag';
ens;
Panel4.caption:=tagg;

Dann sagt mir der Compiler:

Zitat:

[Fehler] Unit1.pas(273): Ordinaltyp erforderlich

In der zeile wo das Case-Of steht, aber warum? ich bnutze Case-Ofs doch immer so...?
Bitte um Hilfe