Galgenmännchen

[Tomislav]

Delphi-Quellcode:

rocedure TForm1.btnWortwahlClick(Sender: TObject);
var Woerterliste: TStringlist;
var Wort: array of string;

begin
  Woerterliste := TStringList.Create; 
  Woerterliste.LoadFromFile('Woerter.txt');
  radomize;
  
 

  GBWort.Visible := true;
end;