1:
2:
3:
4:
5:
6:
7:
8:
9:

 liste1:= TStringList.Create; //Variable erstellen
               try
               liste1.Add(ListBox1.Items.CommaText); //Inhalt als Kommatext in eine Datei
               liste1.SaveToFile('C:\log.txt'); // Datei Log.txt speichern
               liste1.LoadFromFile('C:\log.txt'); // Datei auslesen
               ListBox1.Items.CommaText := liste1.Strings[0]; // Inhalt in die Listbox schreiben               
  finally  
    liste1.Free;
         end                    

1:
2:
3:
4:
5:
6:
7:

var datei: Textfile;
begin
 ...
 assignfile(datei, 'DerPfadZurDatei');
 rewrite(datei);
 closefile(datei);
 ...