Du kannst da was zusammenfassen:
Delphi-Quellcode:
Zahl := Random(62);
case Zahl
of
0..25: S := Char(Zahl +
ASCII-Wert);
26..51: S := Char(Zahl +
ASCII-Wert);
52..61: S := Char(Zahl +
ASCII-Wert);
end;
Schau dir dazu mal die Werte in der
ASCII-Tabelle an.
