Die Prozedur liest eine Textzeile aus einer Datei. ReadLn liest eine Textzeile aus der angegebenen Datei und setzt den Dateizeiger in die nächste Zeile. Durch den Aufruf ReadLn(F) ohne Parameter wird der Dateizeiger an den Anfang der nächsten Zeile gesetzt. Ist keine nachfolgende Zeile vorhanden, wird er auf das Dateiende gesetzt.
Beispiel
try
AssignFile(F, 'c:\FileName.txt');
try
Reset(F);
S := Readln(F); { Erste Zeile der Datei lesen }
finally
F.Free;
end;
except
ShowMessage('Exception');
end;
Beispiel
var
F : TFileClass;
begin
//...
try
AssignFile(F, 'c:\FileName.txt');
try
Reset(F);
S := Readln(F); { Erste Zeile der Datei lesen }
finally
F.Free;
end;
except
ShowMessage('Exception');
end;
//...
end;