Viel zu umständlich!
Wozu die Anzahl der Wörter speichern, wenn man die selbst zählen kann.
Nimm einfach eine Textdatei mit
einem Wort pro Zeile!
Delphi-Quellcode:
var
liste:TStringList;
zufallswort : string;
begin
liste := TStringList.Create;
liste.LoadFromFile('hangman.txt');
ShowMessage(IntToStr(liste.Count)+' Wörter');
zufallswort := liste[Random(liste.Count)];
....
end;