Thema: Delphi Case of komrpimieren

Einzelnen Beitrag anzeigen

Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Case of komrpimieren

  Alt 25. Nov 2007, 16:27
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)];
  Mit Zitat antworten Zitat