Kompenente funktioniert zur Laufzeit aber nicht im Designer

[Tonic1024]

Hi...

Es ist schon mehrere Delphi-Versionen her, dass ich zuletzt eine eigene Komponente entwickelt hab. Jetzt ist es mal wieder so weit. Ich hab mir, wie früher, eine Klasse von TPanel abgeleitet und daraus eine eigene Komponente erstellt. Wenn ich das Objekt zur Laufzeit erstelle funktioniert sie super aber jetzt will ich sie im Formulardesigner verwenden und es klemmt.

Delphi-Quellcode:

type
  TContentPanel = class(TPanel)
  private

    FTitleImage: TImage;
[..]
  public
    constructor Create(AOwner: TComponent);
[..]
    procedure SetParent(AParent: TWinControl); override;
[..]

constructor TContentPanel.Create(AOwner: TComponent);
begin
  inherited;

  [..]

  FTitleImage:=TImage.Create(self);
  FTitleImage.Parent:=Self;

  [..]
end;


procedure TContentPanel.SetParent(AParent: TWinControl);
begin
  inherited;

  [..]

  if Assigned(FTitleImage) then  // an dieser Stelle scheint FTitleImage nicht zu existieren
  begin
    FTitleImage.Parent:=Self;
    FTitleImage.Picture.LoadFromFile('c:\xxx\test.png');
    FTitleImage.Stretch:=true;
    FTitleImage.Proportional:=false;
    FTitleImage.OnMouseDown:=TitleMouseDown;
    FTitleImage.OnDragOver:=TitleDragOver;
  end;

  [..]
end;

Ich brüte da schon den ganzen Nachmittag drüber. Irgendwie gehen mir die Ideen aus.


Gruß,

Toni