Zufälligen string aus txt Datei laden

[Namenloser]

Hier mal ein kleines Beispiel:

Delphi-Quellcode:

var
  StringList: TStringList;
begin
  StringList := TStringList.Create; // Stringlist erzeugen
  StringList.LoadFromFile('foobar.txt'); // Inhalt aus Datei laden
  // Einzelne Zeilen sind jetzt über StringList[Zeilennummer] ansprechbar
  ShowMessage(StringList[0]); // Gibt erste Zeile in einer MessageBox aus
  StringList.Free; // Stringlist wieder freigeben
end;