Aus Datei auslesen

[omata]

Hallo kaschte,

oder so...

Delphi-Quellcode:

var Datei:Textfile;
    Zeile:string;
begin
  assignfile(Datei, 'Datei.txt');
  reset(Datei);
  try
    while not Eof(Datei) do begin
      readln(Datei, Zeile);
      // hier kann man nun die einzelnen Zeilen weiterverarbeiten
    end;
  finally
    closefile(Datei);
  end;
end;

Edit: reset-Position korrigiert.

Gruss
Thorsten