Einzelnen Beitrag anzeigen

changlee
(Gast)

n/a Beiträge
 
#1

Problem beim Speichern eines einer Klasse in Textdatei

  Alt 4. Dez 2004, 15:48
Hallo,
ich habe ein Problem beim speichern einer Variable.

Ich habe folgende Typdeklarationen geschrieben:

Delphi-Quellcode:
type
  TSpezial = record
    moeglich : boolean;
    hinweis: string[20];
    TextausMemo : TStrings;
  end;

  TDaten = record
    titel,Hinweis:string[20];
    TextAusMemo : TStrings;
    ready : boolean;
    spezielles: TSpezial;
  end;
Später weise ich den alle Werte zu und möchte diese Varaiable speichern.
Zum Speichern schrieb ich:

Delphi-Quellcode:
procedure TForm1.Speichern(Sender: TObject);
var index,n, i : integer;
    F : file of TDaten;
    Datensatz : TDaten;
begin
  Datensatz.Create;
  DatenZuweisen(Datensatz);
  assignfile(F,'test.txt');
  Rewrite(F);
  write(F,Datensatz);
  closefile(F);
  Datensatz.Free;
end;
Ich verstehe nicht, warum es nicht funktioniert. (Ich bekomme einen Fehler: Lesen von Adresse 00000 usw.)

Kann mir jemand sagen, woran es liegt, und wie es richtig geht?

Ich hab es auch schon mit einem Record probiert. Aber dann wird der Text aus aus den TStrings-Variablen scheinbar nicht korrekt gespeichert.

Wär nett, wenn mir jemand helfen würde..

mfg
changlee
  Mit Zitat antworten Zitat