我用了两种方法来处理这件事。（1）您可以调用Set_AreBrowserAcceleratorKeysEnabled（0）禁用浏览器的快捷键（但这可能包括禁用比你想要的更多的东西，而这并不是你真正要求的。）而且它需要一些额外的工作才能访问这个接口，因为它不包括在当前的TEdgeBrowser中。另外，我在什么地方读到AcceleratorKey事件仍然会触发，即使您在EdgeBrowser中禁用了它们，如果您使用该方法，也可以处理它们。（2）使用AddScriptToExecuteOnDocumentCreated注入一些可以阻止默认行为的Javascript（如果需要），并向您的应用发送消息（您将在OnWebMessageReceived上获取该消息），以便您可以处理事件。
备选办法1：
您需要定义以下内容来访问所需的接口，因为它们是在TEdgeBrowser之后引入的：

const
  IID_ICoreWebview2Settings2: TGUID = '{EE9A0F68-F46C-4E32-AC23-EF8CAC224D2A}'; //Introduced: SDK  1.0.864.35
  IID_ICoreWebview2Settings3: TGUID = '{FDB5AB74-AF33-4854-84F0-0A631DEB5EBA}'; //Introduced: SDK  1.0.864.35

type
  ICoreWebView2Settings2 = interface(ICoreWebView2Settings)
    ['{EE9A0F68-F46C-4E32-AC23-EF8CAC224D2A}']
    function Get_UserAgent(out UserAgent: PWideChar): HResult; stdcall;
    function Set_UserAgent(UserAgent: PWideChar): HResult; stdcall;
  end;

  ICoreWebView2Settings3 = interface(ICoreWebView2Settings2)
    ['{FDB5AB74-AF33-4854-84F0-0A631DEB5EBA}']
    function Get_AreBrowserAcceleratorKeysEnabled(out AreBrowserAcceleratorKeysEnabled: Integer): HResult; stdcall;
    function Set_AreBrowserAcceleratorKeysEnabled(AreBrowserAcceleratorKeysEnabled: Integer): HResult; stdcall;
  end;

然后在OnCreateWebViewCompleted事件中，您可以执行以下操作

var
  Settings3: ICoreWebView2Settings3;
  HR: HRESULT;
begin
  Sender.SettingsInterface.QueryInterface(IID_ICoreWebView2Settings3, Settings3);
  if Assigned(Settings3) then
  begin
    HR := Settings3.Set_AreBrowserAcceleratorKeysEnabled(0);
    if not SUCCEEDED(HR) then
      {Do something - Set_AreBrowserAcceleratorKeysEnabled failed};
  end
  else
    {Do something - ICoreWebView2Settings3 interface not found.};
  end;

备选方案二：
在OnCreateWebViewCompleted事件中，可以执行以下操作

const
  JavaScript =
    '  document.addEventListener(''keydown'', function(event){' + sLineBreak +
    '    if (event.code == "F12") {' + sLineBreak +
    '      Result = "#KEY_EVENT#" + event.code;' + sLineBreak +
    '      event.preventDefault();' + sLineBreak +
    '      window.chrome.webview.postMessage(Result);' + sLineBreak +
    '    };' + sLineBreak +
    '  });'; 

{...}                                                                       
begin
  Sender.DefaultInterface.AddScriptToExecuteOnDocumentCreated(JavaScript,
    Callback<HResult, PChar>.CreateAs<ICoreWebView2AddScriptToExecuteOnDocumentCreatedCompletedHandler>(
    function(ErrorCode: HResult; Id: PWideChar): HResult stdcall
    begin
      if not(Succeeded(ErrorCode)) then
        {Do something if this function failed.  It gets called later when a document id created.  Or you can pass nil for the Callback};
      Result := 1;
    end));

注意，在选项2中，请参阅TEdgeBrowser代码作为定义回调的示例。它是在TEdgeBrowser的实现部分定义的。我只是在我自己的窗体的单元实现部分复制了它。

可以在OnCreateWebViewCompleted事件中使用ASender.DevToolsEnabled := False;

@斯塔克曼
我似乎不能使用推荐的解决方案，因为它需要更改页面代码。我想将EdgeBrowser指向任何网站，并且仍然可以控制按键。

procedure TForm1.Button1Click(Sender: TObject);
{$J+}
const
  STEP: integer = 1;
var
 Js: string;
begin
  case STEP of
    1: web.CreateWebView;
    2: web.Navigate('https://stackoverflow.com/questions/70089520/tedgebrowser-for-delphi-10-4-1-and-later-how-to-trap-f12-opendevtoolswindow?noredirect=1#comment123929534_70089520');
    3: begin //Step 2 must have finished!
         Js := Concat('aaa = new Object; ',
                      'aaa.Message = function(Msg) ',
                      '{ ',
                      '   alert(Msg); ',
                      '}');
                      //DevTools-->Console: type aaa
                      web.ExecuteScript(Js);

        end;
     else
        begin
          Js := 'aaa.Message("Hallo Welt!")';
          web.ExecuteScript(Js);
        end;
   end;
   STEP := STEP + 1;
 end;

ConsoleSource

这个“回调”在哪个单元？？？F1没有给予我更多的信息。语法怎么能是Callback〈HResult，PChar〉with〈〉？？？