pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-22 22:17:48 +02:00
Code Issues Actions Releases Activity

Update to CEF 3.2987.1596.gc2b4638

Browse Source 
* New properties in TCEFApplication :  SmoothScrolling, FastUnload,
DisableSafeBrowsing.
* Bug fix in CefResponseFilter. Thanks to Zdravko Gabrovski!
* MiniBrowser now has a context menu option to visit the DOM.
This commit is contained in:
Salvador Diaz Fau
2017-03-22 15:22:11 +01:00
parent 68769fdda2
commit b5b9547d28
23 changed files with 456 additions and 301 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
demos/MiniBrowser/uTestExtension.pas
View File

@ -51,11 +51,6 @@ uses
uCEFv8Context, uCEFTypes, uCEFv8Handler;
type
TCustomRenderProcessHandler = class(TCefRenderProcessHandlerOwn)
protected
procedure OnWebKitInitialized; override;
end;
TCustomBrowserProcessHandler = class(TCefBrowserProcessHandlerOwn)
protected
procedure OnScheduleMessagePumpWork(delayMs: Int64); override;
@ -71,22 +66,6 @@ implementation
var
pumpMessages: Integer = 0;
{ TCustomRenderProcessHandler }
function getpath(const n: ICefDomNode): string;
begin
Result := '<' + n.Name + '>';
if (n.Parent <> nil) then
Result := getpath(n.Parent) + Result;
end;
procedure TCustomRenderProcessHandler.OnWebKitInitialized;
begin
{$IFDEF DELPHI14_UP}
TCefRTTIExtension.Register('app', TTestExtension);
{$ENDIF}
end;
{ TTestExtension }
class procedure TTestExtension.mouseover(const data: string);