使用代码创建TChromium实例

Question

我有一个问题，试图创建Delphi Chromium嵌入式实例与代码

var
  Chromium: TChromium;
begin
  Chromium := TChromium.Create(TcxTabSheet1);
  Chromium.Parent := TWinControl(TcxTabSheet1);
  Chromium.Align := alClient;
  Assert(Assigned(Chromium.Browser), 'HERE! Why Browser is not assigned.');
  ...
end;

浏览器属性似乎是在

procedure TCustomChromium.CreateWindowHandle(const Params: TCreateParams);

是调用的。

为什么在我的代码中没有调用CreateWindowHandle？

Answer 1

我的回答是：

在从CreateWindowHandle初始化Browser属性时，尚未分配Chromium.Browser的原因是：

因为还没有执行任何调用HandleNeeded的操作(当还没有赋值时，它将调用CreateWindowHandle )