我在delphi中使用铬，但我发现我无法创建新的铬标签答案

【问题标题】：i am using chromium in delphi,but i find i cannot create a new chromium tab我在delphi中使用铬，但我发现我无法创建新的铬标签
【发布时间】：2013-04-22 07:15:46
【问题描述】：

我在我的项目中使用 delphichromiumembedded 插件代替 TWebbrowser，当我单击使用 TChrometabs 或 tpagecontrol.thanks 的 pagesheetwindow 时，我无法创建新选项卡。像这样的代码：

procedure TMainForm.ChromeTabs1ButtonAddClick(Sender: TObject;
  var Handled: Boolean);
var
  chrm: TChromium;
  CurrentTab1:TChromeTabs;
begin
  CurrentTab1:=TChromeTabs.Create(Self);
  chrm:=TChromium.Create(CurrentTab1);
  chrm.Align := alClient;
  chrm.Parent := TWinControl(CurrentTab1);
  chrm.DefaultUrl := 'about:blank';
  chrm.Load('http://www.google.com/');
end;

【问题讨论】：

我不明白这个问题。 Norgepaul 漂亮的TChromeTabs 组件带有一个复杂的演示，展示了您需要的所有内容。你的问题是什么？你有什么问题？你不知道如何创建一个新标签或如何创建TChromium 浏览器的实例？
请提供更多细节。编译时错误？运行时错误？意外行为？有代码吗？
对不起，我是个新手。感谢 TLama 和 David Hefferman，我的问题是我不知道如何成功地结合这两个插件（TChromeTabs 和 TChromium），例如，我所期望的是当我点击 TChromeTabs 时，我可以创建一个新的标签页，它是 TChromium 浏览器的新实例。但是现在，即使我点击 TChromeTabs，也会创建一个新标签页，但 TChromium 没有任何变化。
请格式化您的代码以使其可读。 @TLama 的观点是 TChromeTabs 提供了一个功能齐全的演示。你可以从那里开始。

标签： delphi browser tabs chromium

【解决方案1】：

当用户单击“添加”按钮时，您不应该创建一个全新的TChromeTabs 组件。您已经拥有其中之一。您甚至需要创建一个新选项卡，因为默认情况下该组件会为您执行此操作。如果您想手动创建一个新选项卡，则将Handled := True 设置为禁用默认行为，然后调用Sender.Tabs.Add。它返回对新选项卡对象的引用。这在组件附带的示例应用程序中得到了证明；查看ChromeTabs1ButtonAddClick 方法。一旦您拥有该选项卡对象引用，您就可以随心所欲地对其进行操作，例如在其上放置一个浏览器控件。

【讨论】：