Fehlersuche bei Listen

[Klaus01]

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