Case of komrpimieren

[Namenloser]

Du könntest auch mit einem Array arbeiten.

Delphi-Quellcode:

const
  chars: array[0..61] of char = ('A','B','C','D',...,'a','b',...,'0','1,'2'...);
...
  char = chars[random(62)];