Kann man machen, aber mit
Delphi-Quellcode:
SetLength(UsedChars,Ord(High(Char))+1);
// Ord(High(Char)) --> wird 65535 Zeichen groß
wird das Array riesig groß.
Deshalb war mein Vorschlag mit TDictionary (oder irgendein anderer dynamischer Container),
der würde nur soweit wachsen je nachdem wieviel Elemente es gibt
(naja, bei 4GB
RAM spielt das vielleicht auch keine grosse Rolle)
Das interessante ist ja, das irgendwann keine neuen Buchstaben mehr hinzukommen. wenn einmal alle 26 drin sind.