Notebook как контейнер для форм 2

ChildForml[i].Parent := TWinControl(BrowseTabNotebook.Pages.Objects[i]);

private
  { Private }
  procedure CreateParams(var Params: TCreateParams); override;

...

procedure TChildForm1.CreateParams(var Params: TCreateParams);
begin
  { сначала вызываем унаследованные методы. }
  inherited CreateParams(Params);
  with Params do
  begin
    WndParent := Application.Mainform.Handle;
    Style := (Style or WS_CHILD) and not WS_POPUP;
  end;
end;