Delphi Gecko SDK - 有没有人成功使用+ XULRunner 1.9？

Question

我从sf.net（http://sourceforge.net/projects/d-gecko/）结帐了d-gecko SDK。 我想用Gecko（XULRunner）1.9来尝试它，但是每当我在stdcall函数中遇到错误时运行简单的应用程序，指向WebBrowser.Paint行...... 我的问题是 - 有没有人成功在XULRunner 1.9中运行GeckoSDK Delphi应用程序？ 如果是这样 - 怎么样？它对您来说是开箱即用的吗？

由于 米。

Answer 1

我也有这个问题。我刚刚中立了baseWin.Repaint（True）;
之后，所有人都做得很好

procedure TCustomGeckoBrowser.Paint;
var
  rc: TRect;
  baseWin: nsIBaseWindow;
begin
  if csDesigning in ComponentState then
  begin
    rc := ClientRect;
    Canvas.FillRect(rc);
  end else
  begin
    baseWin := FWebBrowser as nsIBaseWindow;
    //baseWin.Repaint(True);
  end;
  inherited;
end;

Answer 2

在webbrowser首次尝试绘制自己之前，您需要在某处导航。因此，必须在组件可见之前调用LoadURI（）。

最简单的解决方案：在组件可见之前调用LoadURI('about:blank')。