Eigene Eigenschaften beim Vererben

[Bigmichi]

Ich habe es ja nun mit einem Button geschafft zu vererben hab im ein Hintergrund zugewiesen mit TImage nur ich konnte ihm durch den Objektinspector kein Bild zuweißen da stand dan in der Zeile TPicture aber ich kontne keins zuweisen wieso ??

Code:

 type TMyNewForm = class(TButton)
    private
      FImage: TImage;
    procedure
      SetImage(Value: TImage);
    public
      constructor Create(AOwner: TComponent); override;
      destructor Destroy; override;

    published
     property Hintergrundbild: TImage read FImage write SetImage;
  end;





constructor TMyNewForm.Create(AOwner: TComponent);
  begin
    inherited Create(AOwner);
    FImage := TImage.Create(Self);
    FImage.Parent := Self;
  end;

destructor TMyNewForm.Destroy;
    begin
      FreeAndNil(FImage);
    inherited Destroy;
  end;



procedure TMyNewForm.SetImage(Value: TImage);
begin
  if FImage <> Value then FImage.Assign(Value);
end;