mehrere Datensätze in Datei schreiben und wieder Auslesen

[tigerman33]

Also z.B. so:

Delphi-Quellcode:

// Datei öffnen
if not EOF(KSK) then begin // ist überhaupt was drin?
  read (KSK, vergleich);
  if not EOF(KSK) then repeat // etwas unschön, muss aber sein... 
    if vergleich.nr=eingabe.nr then
      if vergleich.pin=eingabe.pin then
        label5.caption:=(floattostr(vergleich.stand));
    read (KSK, vergleich);
  until EOF(KSK);
end;

//edit
PS: Ich persönlich schwöre Stein und Bein auf TFileStreams. Die kann ich dir ans Herz legen, sieh dir die mal an. Hat zwar nicht direkt was mit deinem Problem zu tun, aber an vielen Stellen wird dadurch IMHO das Hantieren mit Dateien viel einfacher.