Scrollbox als Property

[nebukadnezzar]

Also ich hab von TTabsheet abgeleitet und will das automatisch eine Scrollbox beim Erstellen mit drauf ist und das deren eigenschaften über den OI einstellbar sind.
also hab ich folgendes getan:

Delphi-Quellcode:

type  TilTabsheet = class(TTabsheet)
  private
   FScrollBox:Tilscrollbox;
  public
   Constructor Create(aowner:Tcomponent);override;
   Destructor Destroy;override;
  published
    { Published declarations }
    Property Scrollbox:TilScrollbox read Fscrollbox write Fscrollbox;
  end;
...

Constructor TilTabsheet.Create(Aowner:Tcomponent);
BEgin
     inherited;
     Scrollbox:=Tilscrollbox.Create(Self);
     scrollbox.Parent:=self;
ENd;

Destructor TilTabsheet.Destroy;
Begin
       scrollbox.free;
     inherited;
end;

ausserdem die Compiler direktive {$m+} benutzt (weil ich das irgendwo in der Hilfe gelesen hab)
aber wenn ich die Einstellungen im OI mache und das Programm starte sind die werte der Properties der Scrollbox futsch

was mache ich falsch?