Textdatei in ein Record einlesen ?

[alcaeus]

Du kannst immer noch mit
Readln(Textdatei,StringVar); eine Zeile aus der Textdatei auslesen. Das ganze machst du solange EoF(Textdatei) False ist. Den String den du dann erhälst kannst du dann auslesen, z.B. so:

Delphi-Quellcode:

var
  TextDatei: TextFile;
  Pfad, Zeile: String;
AssignFile(TextDatei,Pfad);
Reset(TextDatei);
while not EoF(TextDatei) do
begin
  Readln(TextDatei,Zeile);
  if Zeile[1] <> '#' then
//Deine Auswertung
end;
CloseFile(TextDatei);

Der Code ist nicht getestet, aber ich sehe keinen Grund warum er nicht funktionieren sollte