Zitat von
xineohp:
moin,
das ginge dann so:
Delphi-Quellcode:
case Label1.Tag of
0: Label1.Caption := 'Hallo Welt';
1: Label1.Caption := 'ich bin da';
2: Label1.Caption := 'was anderes';
// usw.
end;
inc(Label1.Tag);
If Label1.Tag > 2 // oder eine andere Zahl, je nachdem wieviele Möglichkeiten du oben definiert hast.
then Label1.Tag := 0;
Mh... bei
inc(Label1.Tag);
kommt immer eine Fehlermeldung "Der linken Seite kann nichts zugewiesen werden". Woran könnte das liegen?