FileOpen und EOF

[Kernel32.DLL]

Ich denke mal, das du Textdateien Zeile für Zeile lesen willst. Und für Textdateien zum lesen einer ganzen Zeile gibbet den Befehl:

Aus der Borland Delphi 5 Pro Hilfe:

Zitat:

Die Prozedur Readln liest eine Textzeile aus einer Datei.

Unit

System

Kategorie

Textdateien

procedure Readln([ var F: Text; ] V1 [, V2, ...,Vn ]);

Beschreibung

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.

Wird eine Anwendung als Konsolenanwendung compiliert (mit der Option Anwendung für Textbildschirm in der Registerkarte Linker des Dialogfeldes Projektoptionen oder dem Parameter -cc für den Kommandozeilen-Compiler), werden die Dateien Input und Output automatisch mit dem Konsolenfenster der Anwendung verbunden. Bei grafisch orientierten Anwendungen führt jeder Versuch, aus Input zu lesen oder in Output zu schreiben, zu einem E/A-Fehler.

Hinweis

Mit dem Compiler-Schalter {$I+} können Laufzeitfehler durch Exceptions behandelt werden. Wird {$I–} verwendet, muß explizit mit IOResult auf E/A-Fehler geprüft werden.

Dann kannst du das Ergebnis mit dem String vergleichen, wobei natürlich auch die Länge der Zeile und des Strings eine Rolle spielt.

Bei allen anderen Dateiarten macht das Lesen Zeile für Zeile ja irgendwie keinen Sinn.