Deutsches Lazarusforum

Ich mache gerade erste Schritte mit Dateien und möchte eine Datei lesen.
Dazu habe ich mit einem Editor (Pluma unter UbuntuMate) eine kleine Textdatei
LeseText.txt
erstellt und das Programm unten geschrieben.
Wenn ich das Programm laufen lasse, hört es nicht auf. Es findet anscheinend kein EOF ...

Es müssten auch noch die Anführunszeichen um 1800.23 weg, meint mein Compiler.

Socke hat geschrieben:P.S. ich habe mir die Freiheit genommen, die Prozeduren im Wiki entsprechend auszutauschen

Danke!
Ein schöner Nebeneffekt meiner Frage.

Ich habe uf dieser Wikiseite: http://wiki.freepascal.org/untyped_files/de

das erste Programm angeschaut,
dann eine Textdatei mit Namen Beispiel.txt erstellt und
folgendes Programm in Anlehnung an das Beispiel geschrieben:

var
datDatei: TextFile;
strName: String;

begin
AssignFile(datDatei ...