Poner TLabel en panel de statusbar
 

Como hago para poner un Tlabel en un Panel de StatusBar? Ejemplo: En el panel 6 de Statusbar1 yo quiero poner a un Label.

Has intentado hacer algo como:

Código Delphi [-]
function CrearLabel(parent : TStatusBar);
var
  oLabel : TLabel;
begin
  oLabel := TLabel.create(parent);
  oLabel.Parent  := parent;
  oLabel.caption := 'hello';
  oLabel.top := 0;
  oLabel.left := 0;
  oLabel.visible := true;
end;