You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-07-02 22:26:53 +02:00
Update to CEF 73.1.12
- Added context menu option in JSDemo to get the vertical scroll position. - Now TChromium uses the same keyboard events for the browser and the DevTools. - Fixed a MiniBrowser issue with the F12 keyboard shortcut. Now you can press F12 to hide and show the DevTools correctly.
This commit is contained in:
@ -573,8 +573,6 @@ var
|
||||
begin
|
||||
Result := False;
|
||||
|
||||
if not(Chromium1.IsSameBrowser(browser)) then exit;
|
||||
|
||||
if (event <> nil) and (osEvent <> nil) then
|
||||
case osEvent.Message of
|
||||
WM_KEYUP :
|
||||
@ -728,8 +726,7 @@ procedure TMiniBrowserFrm.Chromium1PreKeyEvent(Sender: TObject;
|
||||
begin
|
||||
Result := False;
|
||||
|
||||
if Chromium1.IsSameBrowser(browser) and
|
||||
(event <> nil) and
|
||||
if (event <> nil) and
|
||||
(event.kind in [KEYEVENT_KEYDOWN, KEYEVENT_KEYUP]) and
|
||||
(event.windows_key_code = VK_F12) then
|
||||
isKeyboardShortcut := True;
|
||||
@ -940,6 +937,7 @@ end;
|
||||
procedure TMiniBrowserFrm.HideDevToolsMsg(var aMessage : TMessage);
|
||||
begin
|
||||
HideDevTools;
|
||||
Chromium1.SetFocus(True);
|
||||
end;
|
||||
|
||||
procedure TMiniBrowserFrm.Inczoom1Click(Sender: TObject);
|
||||
|
Reference in New Issue
Block a user