Delphi-Quellcode:
reset(datei);
[...]
if zahl2=0
then
begin
[u]writeln(datei,name);[/u]
writeln(datei,inttostr(zeit));
end
else
begin
for i:=1 to zahl2*2 do
begin
readln(datei);
end;
writeln(datei,name);
writeln(datei,inttostr(zeit));
end;
end;
closefile(datei);
Bei der unterstrichenen Zeile erhalten ich immer den oben genannten Fehler. Falls ich ein rewrite(datei) davor setzte kommt er nicht und es klappt alles wunderbar, doch das ist ziemlich schlecht für mich, weil ich mehrere Highscores in dieser einen Datei speichern möchte.
Falls einer die Lösung des Problems kennt, wär ich sehr dankbar für Hilfe...
