ein wenig umstellen, schon.
Aber du brauchst dann halt nur einmal einen Datensatz einlesen umd alle 5 Strings zu lesen.
Der Record bindet halt alle Informationen eines Datensatzes zu einem Päckchen zusammen.
Oder Du liest die Daten mit
Delphi-Quellcode:
Zeile:=0;
while not eof(DeineDatei) do
begin
inc(zeile);
ReadLn(DeineDatei,Daten);
Case Zeile of
1: a := daten;
2: b := daten;
3: c := daten;
4: d := daten
5: begin
e:= daten;
Zeile := 0;
end;
end;
end;
ein.
Grüße
Klaus