Problem beim Speichern eines einer Klasse in Textdatei

[Dax]

Du kannst nicht den Konstruktor eines nicht existierenden Objekts aufrufen
So müsste es gehen:

Delphi-Quellcode:

procedure TForm1.Speichern(Sender: TObject);
var index,n, i : integer;
    F : file of TDaten;
    Datensatz : TDaten;
begin
  Datensatz := TDaten.Create;
  DatenZuweisen(Datensatz);
  assignfile(F,'test.txt');
  Rewrite(F);
  write(F,Datensatz);
  closefile(F);
  Datensatz.Free;
end;