3

我第一次尝试新的尝试TEdgeBrowser失败，“系统找不到文件”

procedure TFrmTEdgeBrowser.BtnNavigateClick(Sender: TObject);
var lErrCode: Integer;
begin
  if not EdgeBrowser.Navigate('https://www.google.com') then
  begin
     lErrCode := EdgeBrowser.LastErrorCode;
     ShowMessage(IntToStr(lErrCode) + ': ' + SysErrorMessage(lErrCode));
  end;
end;

错误代码 -2147024894 = $80070002确实是 ERROR_FILE_NOT_FOUND

序列（例如按照https://www.delphipraxis.net/204266-new-vcl-tedgebrowser-component-coming-rad-studio-10-4-a.html或http://docwiki.embarcadero.com/RADStudio /Sydney/en/Using_TEdgeBrowser_Component_and_Changes_to_the_TWebBrowser_Component）：

  • 新建Win10 VM，启动Edge，win安装程序运行并正确安装Edge
  • 通过GetIt下载并安装Edgeview2 SDK
  • 复制c:\Program Files (x86)\Embarcadero\Studio\21.0\Redist\win32\WebView2Loader.dll到应用程序目录

配置：Delphi 10.4.3 Sydney，在 Win10 VM 中运行 32 位应用程序，安装 Edge 84.0.522.52

尝试：https:前面没有，重新启动，试图从TApplicationEvents.OnException

然后我尝试运行演示c:\Users\Public\Documents\Embarcadero\Studio\21.0\Samples\Object Pascal\VCL\WebBrowser\Edge\EdgeBrowser.dproj（将 dll 也复制到该目录中），但这会从其末尾给出初始化错误：

procedure TfrmMain.EdgeBrowserCreateWebViewCompleted(Sender: TCustomEdgeBrowser; AResult: HResult);
begin
{$IFDEF DEBUG}
  OutputDebugString('EdgeBrowser OnCreateWebViewCompleted');
{$ENDIF}
  if Succeeded(AResult) then
  begin
    tbCancel.Enabled := True;
    tbReload.Enabled := True;
    tbGo.Enabled := True;
    edtAddress.Enabled := True;
    Sender.AddWebResourceRequestedFilter('*', COREWEBVIEW2_WEB_RESOURCE_CONTEXT_IMAGE);
  end
  else
  begin
    if AResult = HResultFromWin32(ERROR_FILE_NOT_FOUND) then
      Application.MessageBox('Could not find Edge installation. ' +
        'Do you have a version installed that''s compatible with this WebView2 SDK version?',
        'Edge initialisation error', MB_OK or MB_ICONERROR)
    else
      Application.MessageBox('Failed to initialise Edge browser control',
        'Edge initialisation error', MB_OK or MB_ICONERROR)
  end;
end;

但现在 AResult 是 -2147467259 = $80004005
，这似乎与数据/ODBC 相关。

更新到 Microsoft.Web.Webview2 的更高版本 0.9.579（2020 年 7 月 20 日）没有帮助。

4

1 回答 1

0

我下载了 Edge 的 Beta 版，并为我修复了它。

我使用的是版本 84.0.522.59 (Official build) (64-bit)，和你有同样的问题。

我下载的版本是 85.0.564.30 (Official build) beta (64-bit)。

此外，我回顾了文档，它说要获取金丝雀频道版本。所以当我下载了测试版时，我假设金丝雀版是你应该下载的，并且也会解决这个问题。

http://docwiki.embarcadero.com/RADStudio/Sydney/en/Using_TEdgeBrowser_Component_and_Changes_to_the_TWebBrowser_Component

当前可从 https://www.microsoftedgeinsider.com/download获得基于 Microsoft Edge Chromium 的浏览器（Canary 频道版本，而 WebView2 SDK 处于预发布阶段，目前所需的最低版本为 82.0.430.0）。

于 2020-08-13T18:21:53.663 回答