kompoenenten Eigenschaft speichern

[arturx]

Delphi 7
Ich möchte eine Komponente schreiben und eine nicht-published Eigenschaft in der
Formular Datei speichern. Folgender Code funktioniert nur, wenn ich einen
integer Wert abspeichere (dieses Beispiel findet man in allen Büchern).
Ersetzt man writeint durch writestr, bricht das Ganze ab beim Laden des Formulars, welches diese komponente nutzen soll. Wo liegt der Fehler ??

Delphi-Quellcode:

type tkomponente = class(tpersistent)
    private
       fbackstr : string;
       fbackint : integer;
      ..... 
   end
//=================================================================
//=================================================================
procedure tkomponente.defineproperties(filer: tfiler);
begin
       inherited;
       filer.defineproperty('Backupval',Readpropsyncarr,writepropSyncarr,true);
end;
//===================================================================
procedure tkomponente.Readpropsyncarr(reader: treader);
      begin
                fbackstr := reader.ReadString; //  :wall:  löst den Fehler aus.. !!!!!!
{               fbackint := reader.ReadInteger; // geht
end;
//===================================================================
procedure tkomponente.writepropSyncarr(writer: twriter);
    begin
            writer.WriteString('Hallo'); // Fehler behaftet
{           writer.writeinteger(22);     // geht }
end;
//===================================================================

Hat einer eine Idee ?

arturx

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]