administrar varios toolbars

[_CALI]

...
Quisa copiando los botones y sus respectivas imagenes y acciones al toobar del menu principal cada vez que se crea el form hijo, y bueno tendria que usar un mecanismo para los eventos onActivate

Código Delphi [-]
 
procedure TFormChild.FormCreate(Sender: TObject);
var
i: integer;
boton: TToolButton;
begin
for I := ToolBar1.ButtonCount - 1 downto 0 do
    begin
    boton := TToolButton.Create(ToolBar2);
    boton.Parent :=  ToolBar2;
    boton.Action := ToolBar1.Buttons[i].Action;
    boton.ImageIndex := ToolBar1.Buttons[i].ImageIndex;
    end;
end;

fue lo primero q se me vino a la mente, pero existe una manera mas "elegante" o crrecta de hacerlo


Gracias de nuevo