Hallo,
statt
tSchueler = record
würde ich
tSchueler = packed record
schreiben und die alte Datei löschen..
Ausserdem kannst du mit FileExists prüfen,
ob die Datei vorhanden ist und dann entweder Reset oder ReWrite benutzen.
Das ersetzt natürlich das IOResult nicht.
Bei
procedure TForm1.ButtonEintragSpeichernClick
fiel mir noch was auf.
Was passiert, wenn der letzte Editor leer ist ...
Du hast alle anderen Werte schon in den Datensatz eingetragen
und ereugst zum Schluss einen Fehler.
Die anderen Werte stehen aber trotzdem schon drin !
Besser wäre hier
Delphi-Quellcode:
fehler:= (EditName.Text='') or
(EditOrt.Text='') or
usw.
(EditOrt.EditKlasse='');
Heiko