.txt lesen/schreiben

[DeddyH]

Zitat:

Delphi-Quellcode:

begin
  loeschen := TStringList.Create;
  loeschen.LoadFromFile('notiz.txt');
  zeilen := loeschen.Count;
  loeschen.Delete(i); //welchen Wert soll i denn haben?
  i := i + 1;
  loeschen.Free; //wozu erst löschen, wenn dann die Liste einfach wieder zerstört wird?
  if i = zeilen then
     ShowMessage('keine Notizen mehr vorhanden.'); 
end;