Case of komrpimieren

[Chrissi91]

Hi,

wie ging das gleich noch, wenn man nicht alles tippen will?

Delphi-Quellcode:

case Random(62) of
  0: S := 'A';
  1: S := 'B';
  ...
  26: S := 'a';
  27: S := 'b';
  ...
  52: S := '0';
  53: S := '1';
  ...
end;

Ich habe keine Lust von 0 - 61 alles hinzuschreiben. Hatte schonmal eine kürzere Möglichkeit gelesen, aber wie ging die noch gleich?