Galgenmännchen

[Tomislav]

Delphi-Quellcode:

procedure TForm1.btnWortwahlClick(Sender: TObject);
var Woerterliste: TStringlist;
var Wort: String;

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

´

so stimmts oder????