Danke HolgerX
ich habe nun die var Name aus dem Formular direkt in die Methode SavetoFile als lokale Variable übernommen und nun sieht diese Methode so aus:
Delphi-Quellcode:
procedure TForm1.speichernClick(Sender: TObject);
var Name: TName;
begin
Name:=TName.create;
try
Name.ID:=strtoint(Edit1.text);
Name.Name:=edit2.text;
Name.Herkunft:=Edit3.text;
Name.Geschlecht:=checkBox1.Checked;
ObjectList.Add(Name);
objectlist.SaveToFile('e:\Test\daten.dat');
init;
finally
FreeAndNil(Name);
end;
end;
weiterhin ist jedoch im Formular noch die var objectlist:TMyobjectlist global deklariert.
Am Ergebnis hat sich jedoch nichts verändert. Weiterhin wird nur ein Datensatz im File gespeichert und im Form aufrufen kann ich es auch nicht.
Ich mache da wohl grundsätzlcih was falsch.