duda al crear un descendiente de tpanel

[hibero]

he creado un nuevo componente descendiente de tpanel.

En el metodo oncreate tengo el siguiente codigo

Código Delphi [-]
 constructor TMiPanel.Create(AOwner:TComponent)
 begin
    Inherited Create(AOwner);
    Caption:='';
    color:=clred;
 end;

si inserto un nuevo componente de la clase TMiPanel en un formulario me sigue apareciento el texto por defecto "MiPanel1". El caso es que la siguiente linea en la que cambio el color al panel a rojo si que funciona

Alguien sabe porque cuando creo un nuevo panel no aparece sin caption

saku2