schon mal vielen dank, das erste problem ist gelöst
jetzt kriege ich nur den fehler "Versuch hinter dem Dateiende zu lesen" an dieser Stelle:
Delphi-Quellcode:
while EOF(KSK)=false do
begin
read (KSK, vergleich);
if vergleich.nr=eingabe.nr then
if vergleich.pin=eingabe.pin then
label5.caption:=(floattostr(vergleich.stand));
end;
ich dachte mit "while EOF(KSK)=false" hätte ich ausgeschlossen, hinter dem dateiende zu lesen??