Werte in Textdatei speichern und als Liste in Popup ausgeben

[DGL-luke]

TStringList



Einfaches Beispiel:

Delphi-Quellcode:

var st: TStringList;
    s: string;
begin
  st := TStringList.Create;
  try
    st.LoadFromfile('text.txt');
    for s in st do //ab BDS 2005, ansonsten mit Iterationsvariable: for i := 0 to st.Count -1 do
      showmessage(s); //ab BDS 2005; ansonsten showmessage(st.strings[i]);
  finally
  end;
end;