type array of array speichern

**Snoop007**

Hi,
ich würde gern

Delphi-Quellcode:

			type

  TArrayX = array of array of string[255];

in eine datei speichern und den inhalt auslesen
mein speichern sieht so aus

zusammenfalten · markieren

Delphi-Quellcode:

			...

type

  TDatenSchreiben = class

    Datenschreiben : TArrayX;

  end;

...

procedure TFWDaten.SaveToFile;

var

  xFile : File of TDatenSchreiben;

  x : TDatenSchreiben;

begin

  x := TDatenSchreiben.Create;

  x.Datenschreiben := FDatenErstellt.value;

  FDatenErstellt.FTArray := nil;

  AssignFile(xFile,FFileName);

  rewrite(xFile);

  seek(xFile,length(x.Datenschreiben));

  Write(xFile,x);

  CloseFile(xFile);

  x.Free;

end;

und das laden

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TFWDaten.LoadFromFile;

var

  xFile : File of TDatenSchreiben;

  x : TDatenSchreiben;

begin

  x := TDatenSchreiben.Create;

  FDatenGeladen := TStringArray.Create;

  AssignFile(xFile,FFileName);

  reset(xFile);

  seek(xFile,1);

  Read(xFile,x);

  FDatenGeladen.value := x.Datenschreiben;

  x.Free;

  CloseFile(xFile);

end;

leider geht das nicht so wie ich es mir erhofft habe,
kann ich das überhaupt so machen; oder ist das blödsinn und sollte das ganze lieber lassen ?!

type array of array speichern

type array of array speichern

Forumregeln