Creacion de componentes. Tabs estilo firefox

[DarkByte]

Buenas, estoy intenando crear un navegador con tabs, estilo firefox.

Me parece que aún no se crear bien los objetos.

Código Delphi [-]
procedure TfrmPrincipal.CrearTab (Titulo : string; Direccion : string);
var
  Pagina : TTabSheet;
  Nav    : TWebBrowser;
begin
  Pagina.Create( psNavegador );
  Pagina.Caption := Titulo;
  Nav.Create( Pagina );
  Nav.Align := alClient;
  Nav.Navigate( Direccion );
end;

[[seoane]]

La cosa podría quedar así:

Código Delphi [-]
procedure TfrmPrincipal.CrearTab (Titulo : string; Direccion : string);
var
  Pagina : TTabSheet;
  Nav    : TWebBrowser;
begin
  Pagina:= TTabSheet.Create(psNavegador);
  Pagina.PageControl:= psNavegador;
  Pagina.Caption := Titulo;
  Nav:= TWebbrowser.Create(Pagina);
  // Esta es la unica solcuion que se me ocurrio para que alClient funcione
  TControl(Nav).Parent:= Pagina;
  Nav.Align := alClient;
  Nav.Navigate(Direccion);
end;

[DarkByte]

Muchas gracias, bro!

La respuesta perfecta