TPanel.Create PROBLEM!!!

[DragonDrake]

Moin,
ich habe Folgendes gemacht:
-ich habe eine Klasse erstellt
-diese Klasse ist eine Unterklasse vom normalen Panel
-ich möchte panels erstellen, in dem ich auf ein schon vorhandenes Panel klicke
-es kommen keine Fehlermeldungen, wenn ich das Programm starte
-PROBLEM: Die Pannels sind unsichtbar, sind aber vorhanden.

hier ist der Quellcode von der Unterklasse, die ich erstellt habe:

------------------------------------------------------------------------------------------------------------------

Delphi-Quellcode:

unit UBluePanel;

interface

uses ExtCtrls,
     Classes,
     Graphics,
     Forms,
     Controls;

type TBluePanel = class(TPanel)
 public
  constructor Create (AOwner: TComponent); override;
 end;

implementation

constructor TBluePanel.Create (AOwner: TComponent);
begin
 inherited Create (AOwner);
 Color := clBlue;
 Caption := 'Blau';
 Height := 40;
 Width := 185;
 BorderStyle := bsNone;
 BorderWidth := 1;
 BevelOuter := bvNone;
 BevelInner := bvRaised;
 BevelWidth := 4;
 Visible := True;
end;

end.

----------------------------------------------------------------------------------------

und in dieser Procedure erstelle ich das BluePanel:

----------------------------------------------------------------------------------------

Delphi-Quellcode:

procedure TFPanels.POwnerClick(Sender: TObject);
begin
 BluePanel := TBluePanel.Create(FPanels);
 BluePanel.Autosize := true;
 BluePanel.Left := 10;
 BluePanel.Top := top1;
 BluePanel.Show; {ich habe auch "BluePanel.Visible := true" ausprobiert}
 BluePanel.Parent := FPanels;
 top1 := top1+50;
end;

-----------------------------------------------------------------------------------------
"top1" ist eine variable, die beim erstellen der Form auf 50 gesetzt wird.

ich habe als Parent vom BluePanel schon alles ausprobiert aber es erscheint eifach nicht.

Ich würde mich sehr über Lösungsvorschläge freuen.

mfg
DragonDrake

[edit=mkinzler]Delphi-Tags eingefügt Mfg, mkinzler[/edit]