5

我在我的应用程序中使用 Delphi Chromium Embedded,我有以下问题:如何模拟 F5 键来刷新页面?

4

2 回答 2

5

OnKeyEvent使用以下代码:

uses
  CEFLib;

procedure TForm1.Chromium1KeyEvent(Sender: TObject;
  const browser: ICefBrowser; event: TCefHandlerKeyEventType; code,
  modifiers: Integer; isSystemKey: Boolean; out Result: Boolean);
begin
  if (event = KEYEVENT_RAWKEYDOWN) and (code = VK_F5) then
  begin
    Result := True;
    Chromium1.Browser.Reload;
  end;
end;
于 2013-04-18T10:45:17.303 回答
0

@TLama 也许正确的代码是这样的(在 dcef3 中使用 delphi7):

    if (event^.kind = KEYEVENT_RAWKEYDOWN) and (event^.windows_key_code = VK_F5) then
于 2014-05-14T06:11:16.317 回答