Galgenmännchen

[tigerman33]

Exakt

Jetzt machen wir etwas, was sozusagen zum guten Stil gehört.
Und zwar muss deine Woerterliste am Ende ja auch wieder freigegeben werden. Du brauchst sie ja nicht mehr, und sie frisst nur noch Speicher. (Das ist nicht das was ich meinte, das Freigeben gehört zum Pflichprogramm!).
Um sicherzustellen, dass dies auf jeden Fall geschieht, auch wenn zwischendrin ein Fehler auftreten sollte (z.B. Datei nicht gefunden o.ä.), kapselt man das in einen try..finally..end Block:

Delphi-Quellcode:

begin
  Woerterliste := TStringList.Create;
  try
    Woerterliste.LoadFromFile('Woerter.txt');
    Wort := Woerterliste[Random(Woerterliste.Count - 1)];
  finally
    Woerterliste.Free;
  end;
end;

Was hast du jetzt als nächstes vor?