Random Text Ausgabe

[mOzZzI]

Zitat von Dax:

Delphi-Quellcode:

var list: TStrings

list := TStringList.Create;
list.LoadFromFile(deineDatei);

Randomize;
Label1.Caption := list[Random(list.Count)];

list.Free;

öhm, müsste das nicht

var list: TStringlist; heisen?