mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-02 21:57:37 +02:00
Added support for Lazarus/FPC (windows 32bit)
This commit is contained in:
Salvador Díaz Fau
parent
294a245250
commit
dd5f7f42c4
demos
CookieVisitor
CustomResourceBrowser
DOMVisitor
ExternalPumpBrowser
FMXExternalPumpBrowser
FullScreenBrowser
JavaScript
JSDialog
JSEval
JSExecutingFunctions
JSExtension
JSExtensionWithFunction
JSExtensionWithObjectParameter
JSRTTIExtension
JSSimpleExtension
JSSimpleWindowBinding
JSWindowBindingSubProcess
JSWindowBindingWithFunction
JSWindowBindingWithObject
MDIBrowser
MDIExternalPumpBrowser
MiniBrowser
OSRExternalPumpBrowser
PopupBrowser
PopupBrowser2
ResponseFilterBrowser
SchemeRegistrationBrowser
SimpleBrowser
SimpleBrowser2
SimpleExternalPumpBrowser
SimpleFMXBrowser
SimpleLazarusBrowser
00-Delete.batSimpleLazarusBrowser.icoSimpleLazarusBrowser.lpiSimpleLazarusBrowser.lprSimpleLazarusBrowser.lpsSimpleLazarusBrowser.resusimplelazarusbrowser.lfmusimplelazarusbrowser.pas
SimpleOSRBrowser
SimpleServer
SubProcess
TabbedBrowser
ToolBoxBrowser
packages
00-CreateDelphiResources.bat00-CreateLazarusResources.bat00-DeleteDCUs.batCEF4Delphi.dpkCEF4Delphi_D7.dpkCEF4Delphi_D7_Register.pasCEF4Delphi_FMX.dpkCEF4Delphi_FMX.dprojCEF4Delphi_FMX_Register.pasCEF4Delphi_Register.pascef4delphi_lazarus.lpkcef4delphi_lazarus.pastbufferpanel.pngtcefservercomponent.pngtcefwindowparent.pngtcefworkscheduler.pngtchromium.pngtchromiumwindow.png
source
00-DeleteDCUs.batcef.inctbufferpanel.lrstcefservercomponent.lrstcefwindowparent.lrstcefworkscheduler.lrstchromium.lrstchromiumwindow.lrsuBufferPanel.pasuCEFAccessibilityHandler.pasuCEFApp.pasuCEFApplication.pasuCEFAuthCallback.pasuCEFBaseRefCounted.pasuCEFBaseScopedWrapper.pasuCEFBeforeDownloadCallback.pasuCEFBinaryValue.pasuCEFBrowser.pasuCEFBrowserProcessHandler.pasuCEFCallback.pasuCEFChromium.pasuCEFChromiumEvents.pas
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2017 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2017 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2017 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2017 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
2
demos/SimpleLazarusBrowser/00-Delete.bat
Normal file
2
demos/SimpleLazarusBrowser/00-Delete.bat
Normal file
@ -0,0 +1,2 @@
|
|||||||
|
rmdir /S /Q lib
|
||||||
|
rmdir /S /Q backup
|
||||||
BIN
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.ico
Normal file
BIN
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.ico
Normal file
Binary file not shown.
|
After (image error) Size: 134 KiB |
79
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lpi
Normal file
79
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lpi
Normal file
@ -0,0 +1,79 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="SimpleLazarusBrowser"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="CEF4Delphi_Lazarus"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="2">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="SimpleLazarusBrowser.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="usimplelazarusbrowser.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Form1"/>
|
||||||
|
<HasResources Value="True"/>
|
||||||
|
<ResourceBaseClass Value="Form"/>
|
||||||
|
<UnitName Value="uSimpleLazarusBrowser"/>
|
||||||
|
</Unit1>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\bin\SimpleLazarusBrowser"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Linking>
|
||||||
|
<Options>
|
||||||
|
<Win32>
|
||||||
|
<GraphicApplication Value="True"/>
|
||||||
|
</Win32>
|
||||||
|
</Options>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
29
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lpr
Normal file
29
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lpr
Normal file
@ -0,0 +1,29 @@
|
|||||||
|
program SimpleLazarusBrowser;
|
||||||
|
|
||||||
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
|
uses
|
||||||
|
{$IFDEF UNIX}{$IFDEF UseCThreads}
|
||||||
|
cthreads,
|
||||||
|
{$ENDIF}{$ENDIF}
|
||||||
|
Interfaces, // this includes the LCL widgetset
|
||||||
|
Forms, uSimpleLazarusBrowser
|
||||||
|
{ you can add units after this }
|
||||||
|
,uCEFApplication;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
|
||||||
|
begin
|
||||||
|
GlobalCEFApp := TCefApplication.Create;
|
||||||
|
|
||||||
|
if GlobalCEFApp.StartMainProcess then
|
||||||
|
begin
|
||||||
|
RequireDerivedFormResource:=True;
|
||||||
|
Application.Initialize;
|
||||||
|
Application.CreateForm(TForm1, Form1);
|
||||||
|
Application.Run;
|
||||||
|
end;
|
||||||
|
|
||||||
|
GlobalCEFApp.Free;
|
||||||
|
end.
|
||||||
|
|
||||||
252
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps
Normal file
252
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.lps
Normal file
@ -0,0 +1,252 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="30">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="SimpleLazarusBrowser.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<CursorPos X="3" Y="26"/>
|
||||||
|
<UsageCount Value="33"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="usimplelazarusbrowser.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Form1"/>
|
||||||
|
<HasResources Value="True"/>
|
||||||
|
<ResourceBaseClass Value="Form"/>
|
||||||
|
<UnitName Value="uSimpleLazarusBrowser"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="166"/>
|
||||||
|
<CursorPos X="53" Y="110"/>
|
||||||
|
<UsageCount Value="33"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\..\source\uCEFChromium.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="34"/>
|
||||||
|
<CursorPos Y="49"/>
|
||||||
|
<UsageCount Value="16"/>
|
||||||
|
<Bookmarks Count="6">
|
||||||
|
<Item0 X="35" Y="771" ID="1"/>
|
||||||
|
<Item1 X="46" Y="119" ID="2"/>
|
||||||
|
<Item2 X="17" Y="843" ID="3"/>
|
||||||
|
<Item3 X="20" Y="621" ID="4"/>
|
||||||
|
<Item4 X="57" Y="3494" ID="5"/>
|
||||||
|
<Item5 X="3" Y="1079" ID="6"/>
|
||||||
|
</Bookmarks>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="E:\lazarus\fpc\3.0.4\source\rtl\win32\classes.pp"/>
|
||||||
|
<UnitName Value="Classes"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="129"/>
|
||||||
|
<CursorPos X="5" Y="181"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\..\source\uCEFChromiumWindow.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="47"/>
|
||||||
|
<CursorPos Y="57"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit4>
|
||||||
|
<Unit5>
|
||||||
|
<Filename Value="E:\lazarus\fpc\3.0.4\source\rtl\win\messages.pp"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit5>
|
||||||
|
<Unit6>
|
||||||
|
<Filename Value="E:\lazarus\lcl\lmessages.pp"/>
|
||||||
|
<UnitName Value="LMessages"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="100"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit6>
|
||||||
|
<Unit7>
|
||||||
|
<Filename Value="..\..\source\uCEFWindowParent.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="36"/>
|
||||||
|
<CursorPos X="49" Y="160"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit7>
|
||||||
|
<Unit8>
|
||||||
|
<Filename Value="..\..\source\uCEFWorkScheduler.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="40"/>
|
||||||
|
<CursorPos X="15" Y="62"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit8>
|
||||||
|
<Unit9>
|
||||||
|
<Filename Value="..\..\source\uBufferPanel.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="40"/>
|
||||||
|
<CursorPos X="36" Y="62"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit9>
|
||||||
|
<Unit10>
|
||||||
|
<Filename Value="..\..\source\uCEFServerComponent.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<WindowIndex Value="-1"/>
|
||||||
|
<TopLine Value="40"/>
|
||||||
|
<CursorPos Y="58"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit10>
|
||||||
|
<Unit11>
|
||||||
|
<Filename Value="E:\lazarus\fpc\3.0.4\source\rtl\objpas\classes\classesh.inc"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="1713"/>
|
||||||
|
<CursorPos X="5" Y="1726"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit11>
|
||||||
|
<Unit12>
|
||||||
|
<Filename Value="..\..\..\Lazarus\test - 001\mywincontrol.pas"/>
|
||||||
|
<UnitName Value="MyWinControl"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit12>
|
||||||
|
<Unit13>
|
||||||
|
<Filename Value="..\..\source\uCEFBaseRefCounted.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="184"/>
|
||||||
|
<CursorPos Y="207"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit13>
|
||||||
|
<Unit14>
|
||||||
|
<Filename Value="..\..\source\uCEFBrowser.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="145"/>
|
||||||
|
<CursorPos Y="164"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit14>
|
||||||
|
<Unit15>
|
||||||
|
<Filename Value="..\..\source\uCEFValue.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="151"/>
|
||||||
|
<CursorPos X="38" Y="164"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit15>
|
||||||
|
<Unit16>
|
||||||
|
<Filename Value="..\..\source\uCEFInterfaces.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="367"/>
|
||||||
|
<CursorPos X="14" Y="382"/>
|
||||||
|
<UsageCount Value="12"/>
|
||||||
|
</Unit16>
|
||||||
|
<Unit17>
|
||||||
|
<Filename Value="..\..\source\uCEFApplication.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="1498"/>
|
||||||
|
<CursorPos X="50" Y="1521"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit17>
|
||||||
|
<Unit18>
|
||||||
|
<Filename Value="C:\lazarus\lcl\forms.pp"/>
|
||||||
|
<UnitName Value="Forms"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="556"/>
|
||||||
|
<CursorPos X="15" Y="581"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit18>
|
||||||
|
<Unit19>
|
||||||
|
<Filename Value="C:\lazarus\lcl\include\customform.inc"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="1389"/>
|
||||||
|
<CursorPos X="3" Y="1398"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit19>
|
||||||
|
<Unit20>
|
||||||
|
<Filename Value="C:\lazarus\lcl\controls.pp"/>
|
||||||
|
<UnitName Value="Controls"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="2284"/>
|
||||||
|
<CursorPos X="3" Y="2307"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit20>
|
||||||
|
<Unit21>
|
||||||
|
<Filename Value="C:\lazarus\lcl\lmessages.pp"/>
|
||||||
|
<UnitName Value="LMessages"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="120"/>
|
||||||
|
<CursorPos X="3" Y="146"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit21>
|
||||||
|
<Unit22>
|
||||||
|
<Filename Value="C:\lazarus\fpc\3.0.4\source\rtl\win\wininc\base.inc"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="627"/>
|
||||||
|
<CursorPos X="6" Y="650"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit22>
|
||||||
|
<Unit23>
|
||||||
|
<Filename Value="C:\lazarus\fpc\3.0.4\source\rtl\win64\classes.pp"/>
|
||||||
|
<UnitName Value="Classes"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="24"/>
|
||||||
|
<CursorPos X="18" Y="38"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit23>
|
||||||
|
<Unit24>
|
||||||
|
<Filename Value="C:\lazarus\fpc\3.0.4\source\rtl\win\wininc\messages.inc"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="1321"/>
|
||||||
|
<CursorPos X="44" Y="1334"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit24>
|
||||||
|
<Unit25>
|
||||||
|
<Filename Value="C:\lazarus\fpc\3.0.4\source\rtl\win32\classes.pp"/>
|
||||||
|
<UnitName Value="Classes"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="114"/>
|
||||||
|
<CursorPos X="49" Y="105"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit25>
|
||||||
|
<Unit26>
|
||||||
|
<Filename Value="C:\lazarus\fpc\3.0.4\source\rtl\inc\resh.inc"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="42"/>
|
||||||
|
<CursorPos X="10" Y="56"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit26>
|
||||||
|
<Unit27>
|
||||||
|
<Filename Value="..\..\source\uCEFLibFunctions.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="33"/>
|
||||||
|
<CursorPos X="205" Y="308"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit27>
|
||||||
|
<Unit28>
|
||||||
|
<Filename Value="..\..\source\uCEFTypes.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="1248"/>
|
||||||
|
<UsageCount Value="11"/>
|
||||||
|
</Unit28>
|
||||||
|
<Unit29>
|
||||||
|
<Filename Value="..\..\source\uCEFMiscFunctions.pas"/>
|
||||||
|
<EditorIndex Value="-1"/>
|
||||||
|
<TopLine Value="106"/>
|
||||||
|
<CursorPos X="50" Y="124"/>
|
||||||
|
<UsageCount Value="10"/>
|
||||||
|
</Unit29>
|
||||||
|
</Units>
|
||||||
|
<General>
|
||||||
|
<ActiveWindowIndexAtStart Value="-1"/>
|
||||||
|
</General>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
<Debugging>
|
||||||
|
<BreakPoints Count="1">
|
||||||
|
<Item1>
|
||||||
|
<Kind Value="bpkSource"/>
|
||||||
|
<WatchScope Value="wpsLocal"/>
|
||||||
|
<WatchKind Value="wpkWrite"/>
|
||||||
|
<Source Value="..\..\source\uCEFChromium.pas"/>
|
||||||
|
<Line Value="2233"/>
|
||||||
|
</Item1>
|
||||||
|
</BreakPoints>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
BIN
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.res
Normal file
BIN
demos/SimpleLazarusBrowser/SimpleLazarusBrowser.res
Normal file
Binary file not shown.
68
demos/SimpleLazarusBrowser/usimplelazarusbrowser.lfm
Normal file
68
demos/SimpleLazarusBrowser/usimplelazarusbrowser.lfm
Normal file
@ -0,0 +1,68 @@
|
|||||||
|
object Form1: TForm1
|
||||||
|
Left = 298
|
||||||
|
Height = 574
|
||||||
|
Top = 142
|
||||||
|
Width = 878
|
||||||
|
Caption = 'Initializing browser. Please wait...'
|
||||||
|
ClientHeight = 574
|
||||||
|
ClientWidth = 878
|
||||||
|
OnCloseQuery = FormCloseQuery
|
||||||
|
OnCreate = FormCreate
|
||||||
|
OnShow = FormShow
|
||||||
|
Position = poScreenCenter
|
||||||
|
LCLVersion = '1.8.2.0'
|
||||||
|
object AddressPnl: TPanel
|
||||||
|
Left = 0
|
||||||
|
Height = 23
|
||||||
|
Top = 0
|
||||||
|
Width = 878
|
||||||
|
Align = alTop
|
||||||
|
BevelOuter = bvNone
|
||||||
|
ClientHeight = 23
|
||||||
|
ClientWidth = 878
|
||||||
|
Enabled = False
|
||||||
|
TabOrder = 0
|
||||||
|
object AddressEdt: TEdit
|
||||||
|
Left = 0
|
||||||
|
Height = 23
|
||||||
|
Top = 0
|
||||||
|
Width = 843
|
||||||
|
Align = alClient
|
||||||
|
TabOrder = 0
|
||||||
|
Text = 'https://www.google.com'
|
||||||
|
end
|
||||||
|
object GoBtn: TButton
|
||||||
|
Left = 843
|
||||||
|
Height = 23
|
||||||
|
Top = 0
|
||||||
|
Width = 35
|
||||||
|
Align = alRight
|
||||||
|
Caption = 'Go'
|
||||||
|
OnClick = GoBtnClick
|
||||||
|
TabOrder = 1
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object CEFWindowParent1: TCEFWindowParent
|
||||||
|
Left = 0
|
||||||
|
Height = 551
|
||||||
|
Top = 23
|
||||||
|
Width = 878
|
||||||
|
Align = alClient
|
||||||
|
TabOrder = 1
|
||||||
|
end
|
||||||
|
object Timer1: TTimer
|
||||||
|
Enabled = False
|
||||||
|
Interval = 500
|
||||||
|
OnTimer = Timer1Timer
|
||||||
|
left = 40
|
||||||
|
top = 64
|
||||||
|
end
|
||||||
|
object Chromium1: TChromium
|
||||||
|
OnBeforePopup = Chromium1BeforePopup
|
||||||
|
OnAfterCreated = Chromium1AfterCreated
|
||||||
|
OnBeforeClose = Chromium1BeforeClose
|
||||||
|
OnClose = Chromium1Close
|
||||||
|
left = 40
|
||||||
|
top = 136
|
||||||
|
end
|
||||||
|
end
|
||||||
234
demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas
Normal file
234
demos/SimpleLazarusBrowser/usimplelazarusbrowser.pas
Normal file
@ -0,0 +1,234 @@
|
|||||||
|
// ************************************************************************
|
||||||
|
// ***************************** CEF4Delphi *******************************
|
||||||
|
// ************************************************************************
|
||||||
|
//
|
||||||
|
// CEF4Delphi is based on DCEF3 which uses CEF3 to embed a chromium-based
|
||||||
|
// browser in Delphi applications.
|
||||||
|
//
|
||||||
|
// The original license of DCEF3 still applies to CEF4Delphi.
|
||||||
|
//
|
||||||
|
// For more information about CEF4Delphi visit :
|
||||||
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
|
//
|
||||||
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
|
//
|
||||||
|
// ************************************************************************
|
||||||
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
// ************************************************************************
|
||||||
|
(*
|
||||||
|
* Delphi Chromium Embedded 3
|
||||||
|
*
|
||||||
|
* Usage allowed under the restrictions of the Lesser GNU General Public License
|
||||||
|
* or alternatively the restrictions of the Mozilla Public License 1.1
|
||||||
|
*
|
||||||
|
* Software distributed under the License is distributed on an "AS IS" basis,
|
||||||
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for
|
||||||
|
* the specific language governing rights and limitations under the License.
|
||||||
|
*
|
||||||
|
* Unit owner : Henri Gourvest <hgourvest@gmail.com>
|
||||||
|
* Web site : http://www.progdigy.com
|
||||||
|
* Repository : http://code.google.com/p/delphichromiumembedded/
|
||||||
|
* Group : http://groups.google.com/group/delphichromiumembedded
|
||||||
|
*
|
||||||
|
* Embarcadero Technologies, Inc is not permitted to use or redistribute
|
||||||
|
* this source code without explicit permission.
|
||||||
|
*
|
||||||
|
*)
|
||||||
|
|
||||||
|
unit uSimpleLazarusBrowser;
|
||||||
|
|
||||||
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Windows, Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
|
||||||
|
StdCtrls, LMessages,
|
||||||
|
uCEFChromium, uCEFWindowParent, uCEFInterfaces, uCEFConstants, uCEFTypes, uCEFChromiumEvents;
|
||||||
|
|
||||||
|
type
|
||||||
|
|
||||||
|
{ TForm1 }
|
||||||
|
|
||||||
|
TForm1 = class(TForm)
|
||||||
|
CEFWindowParent1: TCEFWindowParent;
|
||||||
|
Chromium1: TChromium;
|
||||||
|
GoBtn: TButton;
|
||||||
|
AddressEdt: TEdit;
|
||||||
|
AddressPnl: TPanel;
|
||||||
|
Timer1: TTimer;
|
||||||
|
procedure Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser
|
||||||
|
);
|
||||||
|
procedure Chromium1BeforeClose(Sender: TObject; const browser: ICefBrowser);
|
||||||
|
procedure Chromium1BeforePopup(Sender: TObject; const browser: ICefBrowser;
|
||||||
|
const frame: ICefFrame; const targetUrl, targetFrameName: ustring;
|
||||||
|
targetDisposition: TCefWindowOpenDisposition; userGesture: Boolean;
|
||||||
|
const popupFeatures: TCefPopupFeatures; var windowInfo: TCefWindowInfo;
|
||||||
|
var client: ICefClient; var settings: TCefBrowserSettings;
|
||||||
|
var noJavascriptAccess: Boolean; var Result: Boolean);
|
||||||
|
procedure Chromium1Close(Sender: TObject; const browser: ICefBrowser; out
|
||||||
|
Result: Boolean);
|
||||||
|
procedure FormCloseQuery(Sender: TObject; var CanClose: boolean);
|
||||||
|
procedure FormCreate(Sender: TObject);
|
||||||
|
procedure FormShow(Sender: TObject);
|
||||||
|
procedure GoBtnClick(Sender: TObject);
|
||||||
|
procedure Timer1Timer(Sender: TObject);
|
||||||
|
protected
|
||||||
|
// Variables to control when can we destroy the form safely
|
||||||
|
FCanClose : boolean; // Set to True in TChromium.OnBeforeClose
|
||||||
|
FClosing : boolean; // Set to True in the CloseQuery event.
|
||||||
|
|
||||||
|
// You have to handle this two messages to call NotifyMoveOrResizeStarted or some page elements will be misaligned.
|
||||||
|
procedure WMMove(var aMessage : TWMMove); message WM_MOVE;
|
||||||
|
procedure WMMoving(var aMessage : TMessage); message WM_MOVING;
|
||||||
|
// You also have to handle these two messages to set GlobalCEFApp.OsmodalLoop
|
||||||
|
procedure WMEnterMenuLoop(var aMessage: TMessage); message WM_ENTERMENULOOP;
|
||||||
|
procedure WMExitMenuLoop(var aMessage: TMessage); message WM_EXITMENULOOP;
|
||||||
|
|
||||||
|
procedure BrowserCreatedMsg(var aMessage : TMessage); message CEF_AFTERCREATED;
|
||||||
|
procedure BrowserDestroyMsg(var aMessage : TMessage); message CEF_DESTROY;
|
||||||
|
public
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
|
var
|
||||||
|
Form1 : TForm1;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
{$R *.lfm}
|
||||||
|
|
||||||
|
// This is a demo with the simplest web browser you can build using CEF4Delphi and
|
||||||
|
// it doesn't show any sign of progress like other web browsers do.
|
||||||
|
|
||||||
|
// Remember that it may take a few seconds to load if Windows update, your antivirus or
|
||||||
|
// any other windows service is using your hard drive.
|
||||||
|
|
||||||
|
// Depending on your internet connection it may take longer than expected.
|
||||||
|
|
||||||
|
// Please check that your firewall or antivirus are not blocking this application
|
||||||
|
// or the domain "google.com". If you don't live in the US, you'll be redirected to
|
||||||
|
// another domain which will take a little time too.
|
||||||
|
|
||||||
|
// This demo uses a TChromium and a TCEFWindowParent
|
||||||
|
|
||||||
|
uses
|
||||||
|
uCEFApplication;
|
||||||
|
|
||||||
|
{ TForm1 }
|
||||||
|
|
||||||
|
procedure TForm1.FormCreate(Sender: TObject);
|
||||||
|
begin
|
||||||
|
FCanClose := False;
|
||||||
|
FClosing := False;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: boolean);
|
||||||
|
begin
|
||||||
|
CanClose := FCanClose;
|
||||||
|
|
||||||
|
if not(FClosing) then
|
||||||
|
begin
|
||||||
|
FClosing := True;
|
||||||
|
Visible := False;
|
||||||
|
Chromium1.CloseBrowser(True);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.Chromium1AfterCreated(Sender: TObject; const browser: ICefBrowser);
|
||||||
|
begin
|
||||||
|
// Now the browser is fully initialized we can send a message to the main form to load the initial web page.
|
||||||
|
PostMessage(Handle, CEF_AFTERCREATED, 0, 0);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.Chromium1BeforeClose(Sender: TObject; const browser: ICefBrowser);
|
||||||
|
begin
|
||||||
|
FCanClose := True;
|
||||||
|
PostMessage(Handle, WM_CLOSE, 0, 0);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.Chromium1BeforePopup(Sender: TObject;
|
||||||
|
const browser: ICefBrowser; const frame: ICefFrame; const targetUrl,
|
||||||
|
targetFrameName: ustring; targetDisposition: TCefWindowOpenDisposition;
|
||||||
|
userGesture: Boolean; const popupFeatures: TCefPopupFeatures;
|
||||||
|
var windowInfo: TCefWindowInfo; var client: ICefClient;
|
||||||
|
var settings: TCefBrowserSettings; var noJavascriptAccess: Boolean;
|
||||||
|
var Result: Boolean);
|
||||||
|
begin
|
||||||
|
// For simplicity, this demo blocks all popup windows and new tabs
|
||||||
|
Result := (targetDisposition in [WOD_NEW_FOREGROUND_TAB, WOD_NEW_BACKGROUND_TAB, WOD_NEW_POPUP, WOD_NEW_WINDOW]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.Chromium1Close(Sender: TObject; const browser: ICefBrowser; out Result: Boolean);
|
||||||
|
begin
|
||||||
|
PostMessage(Handle, CEF_DESTROY, 0, 0);
|
||||||
|
Result := True;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.FormShow(Sender: TObject);
|
||||||
|
begin
|
||||||
|
// You *MUST* call CreateBrowser to create and initialize the browser.
|
||||||
|
// This will trigger the AfterCreated event when the browser is fully
|
||||||
|
// initialized and ready to receive commands.
|
||||||
|
|
||||||
|
// GlobalCEFApp.GlobalContextInitialized has to be TRUE before creating any browser
|
||||||
|
// If it's not initialized yet, we use a simple timer to create the browser later.
|
||||||
|
//if not(Chromium1.CreateBrowser(CEFWindowParent1)) then Timer1.Enabled := True;
|
||||||
|
Chromium1.CreateBrowser(CEFWindowParent1);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.GoBtnClick(Sender: TObject);
|
||||||
|
begin
|
||||||
|
// This will load the URL in the edit box
|
||||||
|
Chromium1.LoadURL(UTF8Decode(AddressEdt.Text));
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.Timer1Timer(Sender: TObject);
|
||||||
|
begin
|
||||||
|
Timer1.Enabled := False;
|
||||||
|
if not(Chromium1.CreateBrowser(CEFWindowParent1)) and not(Chromium1.Initialized) then
|
||||||
|
Timer1.Enabled := True;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.WMMove(var aMessage: TWMMove);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
|
||||||
|
if (Chromium1 <> nil) then Chromium1.NotifyMoveOrResizeStarted;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.WMMoving(var aMessage: TMessage);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
|
||||||
|
if (Chromium1 <> nil) then Chromium1.NotifyMoveOrResizeStarted;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.WMEnterMenuLoop(var aMessage: TMessage);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
|
||||||
|
if (aMessage.wParam = 0) and (GlobalCEFApp <> nil) then GlobalCEFApp.OsmodalLoop := True;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.WMExitMenuLoop(var aMessage: TMessage);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
|
||||||
|
if (aMessage.wParam = 0) and (GlobalCEFApp <> nil) then GlobalCEFApp.OsmodalLoop := False;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.BrowserCreatedMsg(var aMessage: TMessage);
|
||||||
|
begin
|
||||||
|
Caption := 'Simple Lazarus Browser';
|
||||||
|
AddressPnl.Enabled := True;
|
||||||
|
GoBtn.Click;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TForm1.BrowserDestroyMsg(var aMessage: TMessage);
|
||||||
|
begin
|
||||||
|
CEFWindowParent1.Free;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
|
|
||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
7
packages/00-CreateLazarusResources.bat
Normal file
7
packages/00-CreateLazarusResources.bat
Normal file
@ -0,0 +1,7 @@
|
|||||||
|
e:\lazarus\tools\lazres.exe ..\source\tbufferpanel.lrs tbufferpanel.png
|
||||||
|
e:\lazarus\tools\lazres.exe ..\source\tcefservercomponent.lrs tcefservercomponent.png
|
||||||
|
e:\lazarus\tools\lazres.exe ..\source\tcefwindowparent.lrs tcefwindowparent.png
|
||||||
|
e:\lazarus\tools\lazres.exe ..\source\tcefworkscheduler.lrs tcefworkscheduler.png
|
||||||
|
e:\lazarus\tools\lazres.exe ..\source\tchromium.lrs tchromium.png
|
||||||
|
e:\lazarus\tools\lazres.exe ..\source\tchromiumwindow.lrs tchromiumwindow.png
|
||||||
|
pause
|
||||||
@ -6,8 +6,8 @@ del /s /q *.identcache
|
|||||||
del /s /q *.stat
|
del /s /q *.stat
|
||||||
del /s /q *.local
|
del /s /q *.local
|
||||||
del /s /q *.~*
|
del /s /q *.~*
|
||||||
rmdir Win32\Debug
|
rmdir /S /Q Win32
|
||||||
rmdir Win32\Release
|
rmdir /S /Q backup
|
||||||
rmdir Win32
|
rmdir /S /Q lib
|
||||||
rmdir __history
|
rmdir /S /Q __history
|
||||||
rmdir __recovery
|
rmdir /S /Q __recovery
|
||||||
|
|||||||
@ -130,7 +130,6 @@ contains
|
|||||||
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
||||||
uCEFImage in '..\source\uCEFImage.pas',
|
uCEFImage in '..\source\uCEFImage.pas',
|
||||||
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
||||||
uCEFv8Types in '..\source\uCEFv8Types.pas',
|
|
||||||
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
||||||
uCEFChromium in '..\source\uCEFChromium.pas',
|
uCEFChromium in '..\source\uCEFChromium.pas',
|
||||||
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
||||||
|
|||||||
@ -128,7 +128,6 @@ contains
|
|||||||
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
||||||
uCEFImage in '..\source\uCEFImage.pas',
|
uCEFImage in '..\source\uCEFImage.pas',
|
||||||
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
||||||
uCEFv8Types in '..\source\uCEFv8Types.pas',
|
|
||||||
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
||||||
uCEFChromium in '..\source\uCEFChromium.pas',
|
uCEFChromium in '..\source\uCEFChromium.pas',
|
||||||
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -9,22 +9,23 @@ package CEF4Delphi_FMX;
|
|||||||
{$EXTENDEDSYNTAX ON}
|
{$EXTENDEDSYNTAX ON}
|
||||||
{$IMPORTEDDATA ON}
|
{$IMPORTEDDATA ON}
|
||||||
{$IOCHECKS ON}
|
{$IOCHECKS ON}
|
||||||
{$LOCALSYMBOLS OFF}
|
{$LOCALSYMBOLS ON}
|
||||||
{$LONGSTRINGS ON}
|
{$LONGSTRINGS ON}
|
||||||
{$OPENSTRINGS ON}
|
{$OPENSTRINGS ON}
|
||||||
{$OPTIMIZATION ON}
|
{$OPTIMIZATION OFF}
|
||||||
{$OVERFLOWCHECKS OFF}
|
{$OVERFLOWCHECKS ON}
|
||||||
{$RANGECHECKS OFF}
|
{$RANGECHECKS ON}
|
||||||
{$REFERENCEINFO OFF}
|
{$REFERENCEINFO ON}
|
||||||
{$SAFEDIVIDE OFF}
|
{$SAFEDIVIDE OFF}
|
||||||
{$STACKFRAMES OFF}
|
{$STACKFRAMES ON}
|
||||||
{$TYPEDADDRESS OFF}
|
{$TYPEDADDRESS OFF}
|
||||||
{$VARSTRINGCHECKS ON}
|
{$VARSTRINGCHECKS ON}
|
||||||
{$WRITEABLECONST OFF}
|
{$WRITEABLECONST OFF}
|
||||||
{$MINENUMSIZE 1}
|
{$MINENUMSIZE 1}
|
||||||
{$IMAGEBASE $400000}
|
{$IMAGEBASE $400000}
|
||||||
{$DEFINE RELEASE}
|
{$DEFINE DEBUG}
|
||||||
{$ENDIF IMPLICITBUILDING}
|
{$ENDIF IMPLICITBUILDING}
|
||||||
|
{$DESCRIPTION 'CEF4Delphi'}
|
||||||
{$IMPLICITBUILD OFF}
|
{$IMPLICITBUILD OFF}
|
||||||
|
|
||||||
requires
|
requires
|
||||||
@ -130,7 +131,6 @@ contains
|
|||||||
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
uCEFResponseFilter in '..\source\uCEFResponseFilter.pas',
|
||||||
uCEFImage in '..\source\uCEFImage.pas',
|
uCEFImage in '..\source\uCEFImage.pas',
|
||||||
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
uCEFMenuModelDelegate in '..\source\uCEFMenuModelDelegate.pas',
|
||||||
uCEFv8Types in '..\source\uCEFv8Types.pas',
|
|
||||||
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
uCEFWindowParent in '..\source\uCEFWindowParent.pas',
|
||||||
uCEFChromium in '..\source\uCEFChromium.pas',
|
uCEFChromium in '..\source\uCEFChromium.pas',
|
||||||
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
uCEFChromiumEvents in '..\source\uCEFChromiumEvents.pas',
|
||||||
|
|||||||
@ -241,7 +241,6 @@
|
|||||||
<DCCReference Include="..\source\uCEFResponseFilter.pas"/>
|
<DCCReference Include="..\source\uCEFResponseFilter.pas"/>
|
||||||
<DCCReference Include="..\source\uCEFImage.pas"/>
|
<DCCReference Include="..\source\uCEFImage.pas"/>
|
||||||
<DCCReference Include="..\source\uCEFMenuModelDelegate.pas"/>
|
<DCCReference Include="..\source\uCEFMenuModelDelegate.pas"/>
|
||||||
<DCCReference Include="..\source\uCEFv8Types.pas"/>
|
|
||||||
<DCCReference Include="..\source\uCEFWindowParent.pas"/>
|
<DCCReference Include="..\source\uCEFWindowParent.pas"/>
|
||||||
<DCCReference Include="..\source\uCEFChromium.pas"/>
|
<DCCReference Include="..\source\uCEFChromium.pas"/>
|
||||||
<DCCReference Include="..\source\uCEFChromiumEvents.pas"/>
|
<DCCReference Include="..\source\uCEFChromiumEvents.pas"/>
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
|
|||||||
577
packages/cef4delphi_lazarus.lpk
Normal file
577
packages/cef4delphi_lazarus.lpk
Normal file
@ -0,0 +1,577 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<Package Version="4">
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Name Value="CEF4Delphi_Lazarus"/>
|
||||||
|
<Type Value="RunAndDesignTime"/>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="..\source"/>
|
||||||
|
<OtherUnitFiles Value="..\source"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Files Count="133">
|
||||||
|
<Item1>
|
||||||
|
<Filename Value="..\source\uCEFAccessibilityHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFAccessibilityHandler"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Filename Value="..\source\uCEFApp.pas"/>
|
||||||
|
<UnitName Value="uCEFApp"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Filename Value="..\source\uCEFApplication.pas"/>
|
||||||
|
<UnitName Value="uCEFApplication"/>
|
||||||
|
</Item3>
|
||||||
|
<Item4>
|
||||||
|
<Filename Value="..\source\uCEFAuthCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFAuthCallback"/>
|
||||||
|
</Item4>
|
||||||
|
<Item5>
|
||||||
|
<Filename Value="..\source\uCEFBaseRefCounted.pas"/>
|
||||||
|
<UnitName Value="uCEFBaseRefCounted"/>
|
||||||
|
</Item5>
|
||||||
|
<Item6>
|
||||||
|
<Filename Value="..\source\uCEFBaseScopedWrapper.pas"/>
|
||||||
|
<UnitName Value="uCEFBaseScopedWrapper"/>
|
||||||
|
</Item6>
|
||||||
|
<Item7>
|
||||||
|
<Filename Value="..\source\uCEFBeforeDownloadCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFBeforeDownloadCallback"/>
|
||||||
|
</Item7>
|
||||||
|
<Item8>
|
||||||
|
<Filename Value="..\source\uCEFBinaryValue.pas"/>
|
||||||
|
<UnitName Value="uCEFBinaryValue"/>
|
||||||
|
</Item8>
|
||||||
|
<Item9>
|
||||||
|
<Filename Value="..\source\uCEFBrowser.pas"/>
|
||||||
|
<UnitName Value="uCEFBrowser"/>
|
||||||
|
</Item9>
|
||||||
|
<Item10>
|
||||||
|
<Filename Value="..\source\uCEFBrowserProcessHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFBrowserProcessHandler"/>
|
||||||
|
</Item10>
|
||||||
|
<Item11>
|
||||||
|
<Filename Value="..\source\uCEFCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFCallback"/>
|
||||||
|
</Item11>
|
||||||
|
<Item12>
|
||||||
|
<Filename Value="..\source\uCEFChromiumEvents.pas"/>
|
||||||
|
<UnitName Value="uCEFChromiumEvents"/>
|
||||||
|
</Item12>
|
||||||
|
<Item13>
|
||||||
|
<Filename Value="..\source\uCEFChromiumFontOptions.pas"/>
|
||||||
|
<UnitName Value="uCEFChromiumFontOptions"/>
|
||||||
|
</Item13>
|
||||||
|
<Item14>
|
||||||
|
<Filename Value="..\source\uCEFChromiumOptions.pas"/>
|
||||||
|
<UnitName Value="uCEFChromiumOptions"/>
|
||||||
|
</Item14>
|
||||||
|
<Item15>
|
||||||
|
<Filename Value="..\source\uCEFChromiumWindow.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uCEFChromiumWindow"/>
|
||||||
|
</Item15>
|
||||||
|
<Item16>
|
||||||
|
<Filename Value="..\source\uCEFClient.pas"/>
|
||||||
|
<UnitName Value="uCEFClient"/>
|
||||||
|
</Item16>
|
||||||
|
<Item17>
|
||||||
|
<Filename Value="..\source\uCEFCommandLine.pas"/>
|
||||||
|
<UnitName Value="uCEFCommandLine"/>
|
||||||
|
</Item17>
|
||||||
|
<Item18>
|
||||||
|
<Filename Value="..\source\uCEFCompletionCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFCompletionCallback"/>
|
||||||
|
</Item18>
|
||||||
|
<Item19>
|
||||||
|
<Filename Value="..\source\uCEFConstants.pas"/>
|
||||||
|
<UnitName Value="uCEFConstants"/>
|
||||||
|
</Item19>
|
||||||
|
<Item20>
|
||||||
|
<Filename Value="..\source\uCEFContextMenuHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFContextMenuHandler"/>
|
||||||
|
</Item20>
|
||||||
|
<Item21>
|
||||||
|
<Filename Value="..\source\uCEFContextMenuParams.pas"/>
|
||||||
|
<UnitName Value="uCEFContextMenuParams"/>
|
||||||
|
</Item21>
|
||||||
|
<Item22>
|
||||||
|
<Filename Value="..\source\uCEFCookieManager.pas"/>
|
||||||
|
<UnitName Value="uCEFCookieManager"/>
|
||||||
|
</Item22>
|
||||||
|
<Item23>
|
||||||
|
<Filename Value="..\source\uCEFCookieVisitor.pas"/>
|
||||||
|
<UnitName Value="uCEFCookieVisitor"/>
|
||||||
|
</Item23>
|
||||||
|
<Item24>
|
||||||
|
<Filename Value="..\source\uCEFCustomStreamReader.pas"/>
|
||||||
|
<UnitName Value="uCEFCustomStreamReader"/>
|
||||||
|
</Item24>
|
||||||
|
<Item25>
|
||||||
|
<Filename Value="..\source\uCEFDeleteCookiesCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFDeleteCookiesCallback"/>
|
||||||
|
</Item25>
|
||||||
|
<Item26>
|
||||||
|
<Filename Value="..\source\uCEFDialogHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFDialogHandler"/>
|
||||||
|
</Item26>
|
||||||
|
<Item27>
|
||||||
|
<Filename Value="..\source\uCEFDictionaryValue.pas"/>
|
||||||
|
<UnitName Value="uCEFDictionaryValue"/>
|
||||||
|
</Item27>
|
||||||
|
<Item28>
|
||||||
|
<Filename Value="..\source\uCEFDisplayHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFDisplayHandler"/>
|
||||||
|
</Item28>
|
||||||
|
<Item29>
|
||||||
|
<Filename Value="..\source\uCEFDomDocument.pas"/>
|
||||||
|
<UnitName Value="uCEFDomDocument"/>
|
||||||
|
</Item29>
|
||||||
|
<Item30>
|
||||||
|
<Filename Value="..\source\uCEFDomNode.pas"/>
|
||||||
|
<UnitName Value="uCEFDomNode"/>
|
||||||
|
</Item30>
|
||||||
|
<Item31>
|
||||||
|
<Filename Value="..\source\uCEFDomVisitor.pas"/>
|
||||||
|
<UnitName Value="uCEFDomVisitor"/>
|
||||||
|
</Item31>
|
||||||
|
<Item32>
|
||||||
|
<Filename Value="..\source\uCEFDownloadHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFDownloadHandler"/>
|
||||||
|
</Item32>
|
||||||
|
<Item33>
|
||||||
|
<Filename Value="..\source\uCEFDownloadImageCallBack.pas"/>
|
||||||
|
<UnitName Value="uCEFDownloadImageCallBack"/>
|
||||||
|
</Item33>
|
||||||
|
<Item34>
|
||||||
|
<Filename Value="..\source\uCEFDownLoadItem.pas"/>
|
||||||
|
<UnitName Value="uCEFDownLoadItem"/>
|
||||||
|
</Item34>
|
||||||
|
<Item35>
|
||||||
|
<Filename Value="..\source\uCEFDownloadItemCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFDownloadItemCallback"/>
|
||||||
|
</Item35>
|
||||||
|
<Item36>
|
||||||
|
<Filename Value="..\source\uCEFDragData.pas"/>
|
||||||
|
<UnitName Value="uCEFDragData"/>
|
||||||
|
</Item36>
|
||||||
|
<Item37>
|
||||||
|
<Filename Value="..\source\uCEFDragHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFDragHandler"/>
|
||||||
|
</Item37>
|
||||||
|
<Item38>
|
||||||
|
<Filename Value="..\source\uCEFEndTracingCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFEndTracingCallback"/>
|
||||||
|
</Item38>
|
||||||
|
<Item39>
|
||||||
|
<Filename Value="..\source\uCEFExtension.pas"/>
|
||||||
|
<UnitName Value="uCEFExtension"/>
|
||||||
|
</Item39>
|
||||||
|
<Item40>
|
||||||
|
<Filename Value="..\source\uCEFExtensionHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFExtensionHandler"/>
|
||||||
|
</Item40>
|
||||||
|
<Item41>
|
||||||
|
<Filename Value="..\source\uCEFFileDialogCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFFileDialogCallback"/>
|
||||||
|
</Item41>
|
||||||
|
<Item42>
|
||||||
|
<Filename Value="..\source\uCEFFindHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFFindHandler"/>
|
||||||
|
</Item42>
|
||||||
|
<Item43>
|
||||||
|
<Filename Value="..\source\uCEFFocusHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFFocusHandler"/>
|
||||||
|
</Item43>
|
||||||
|
<Item44>
|
||||||
|
<Filename Value="..\source\uCEFFrame.pas"/>
|
||||||
|
<UnitName Value="uCEFFrame"/>
|
||||||
|
</Item44>
|
||||||
|
<Item45>
|
||||||
|
<Filename Value="..\source\uCEFGetExtensionResourceCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFGetExtensionResourceCallback"/>
|
||||||
|
</Item45>
|
||||||
|
<Item46>
|
||||||
|
<Filename Value="..\source\uCEFImage.pas"/>
|
||||||
|
<UnitName Value="uCEFImage"/>
|
||||||
|
</Item46>
|
||||||
|
<Item47>
|
||||||
|
<Filename Value="..\source\uCEFInterfaces.pas"/>
|
||||||
|
<UnitName Value="uCEFInterfaces"/>
|
||||||
|
</Item47>
|
||||||
|
<Item48>
|
||||||
|
<Filename Value="..\source\uCEFJsDialogCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFJsDialogCallback"/>
|
||||||
|
</Item48>
|
||||||
|
<Item49>
|
||||||
|
<Filename Value="..\source\uCEFJsDialogHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFJsDialogHandler"/>
|
||||||
|
</Item49>
|
||||||
|
<Item50>
|
||||||
|
<Filename Value="..\source\uCEFKeyboardHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFKeyboardHandler"/>
|
||||||
|
</Item50>
|
||||||
|
<Item51>
|
||||||
|
<Filename Value="..\source\uCEFLibFunctions.pas"/>
|
||||||
|
<UnitName Value="uCEFLibFunctions"/>
|
||||||
|
</Item51>
|
||||||
|
<Item52>
|
||||||
|
<Filename Value="..\source\uCEFLifeSpanHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFLifeSpanHandler"/>
|
||||||
|
</Item52>
|
||||||
|
<Item53>
|
||||||
|
<Filename Value="..\source\uCEFListValue.pas"/>
|
||||||
|
<UnitName Value="uCEFListValue"/>
|
||||||
|
</Item53>
|
||||||
|
<Item54>
|
||||||
|
<Filename Value="..\source\uCEFLoadHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFLoadHandler"/>
|
||||||
|
</Item54>
|
||||||
|
<Item55>
|
||||||
|
<Filename Value="..\source\uCEFMenuModel.pas"/>
|
||||||
|
<UnitName Value="uCEFMenuModel"/>
|
||||||
|
</Item55>
|
||||||
|
<Item56>
|
||||||
|
<Filename Value="..\source\uCEFMenuModelDelegate.pas"/>
|
||||||
|
<UnitName Value="uCEFMenuModelDelegate"/>
|
||||||
|
</Item56>
|
||||||
|
<Item57>
|
||||||
|
<Filename Value="..\source\uCEFMiscFunctions.pas"/>
|
||||||
|
<UnitName Value="uCEFMiscFunctions"/>
|
||||||
|
</Item57>
|
||||||
|
<Item58>
|
||||||
|
<Filename Value="..\source\uCEFNavigationEntry.pas"/>
|
||||||
|
<UnitName Value="uCEFNavigationEntry"/>
|
||||||
|
</Item58>
|
||||||
|
<Item59>
|
||||||
|
<Filename Value="..\source\uCEFNavigationEntryVisitor.pas"/>
|
||||||
|
<UnitName Value="uCEFNavigationEntryVisitor"/>
|
||||||
|
</Item59>
|
||||||
|
<Item60>
|
||||||
|
<Filename Value="..\source\uCEFPDFPrintCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFPDFPrintCallback"/>
|
||||||
|
</Item60>
|
||||||
|
<Item61>
|
||||||
|
<Filename Value="..\source\uCEFPDFPrintOptions.pas"/>
|
||||||
|
<UnitName Value="uCEFPDFPrintOptions"/>
|
||||||
|
</Item61>
|
||||||
|
<Item62>
|
||||||
|
<Filename Value="..\source\uCEFPostData.pas"/>
|
||||||
|
<UnitName Value="uCEFPostData"/>
|
||||||
|
</Item62>
|
||||||
|
<Item63>
|
||||||
|
<Filename Value="..\source\uCEFPostDataElement.pas"/>
|
||||||
|
<UnitName Value="uCEFPostDataElement"/>
|
||||||
|
</Item63>
|
||||||
|
<Item64>
|
||||||
|
<Filename Value="..\source\uCEFPrintSettings.pas"/>
|
||||||
|
<UnitName Value="uCEFPrintSettings"/>
|
||||||
|
</Item64>
|
||||||
|
<Item65>
|
||||||
|
<Filename Value="..\source\uCEFProcessMessage.pas"/>
|
||||||
|
<UnitName Value="uCEFProcessMessage"/>
|
||||||
|
</Item65>
|
||||||
|
<Item66>
|
||||||
|
<Filename Value="..\source\uCEFRegisterCDMCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFRegisterCDMCallback"/>
|
||||||
|
</Item66>
|
||||||
|
<Item67>
|
||||||
|
<Filename Value="..\source\uCEFRenderHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFRenderHandler"/>
|
||||||
|
</Item67>
|
||||||
|
<Item68>
|
||||||
|
<Filename Value="..\source\uCEFRenderProcessHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFRenderProcessHandler"/>
|
||||||
|
</Item68>
|
||||||
|
<Item69>
|
||||||
|
<Filename Value="..\source\uCEFRequest.pas"/>
|
||||||
|
<UnitName Value="uCEFRequest"/>
|
||||||
|
</Item69>
|
||||||
|
<Item70>
|
||||||
|
<Filename Value="..\source\uCEFRequestCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFRequestCallback"/>
|
||||||
|
</Item70>
|
||||||
|
<Item71>
|
||||||
|
<Filename Value="..\source\uCEFRequestContext.pas"/>
|
||||||
|
<UnitName Value="uCEFRequestContext"/>
|
||||||
|
</Item71>
|
||||||
|
<Item72>
|
||||||
|
<Filename Value="..\source\uCEFRequestContextHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFRequestContextHandler"/>
|
||||||
|
</Item72>
|
||||||
|
<Item73>
|
||||||
|
<Filename Value="..\source\uCEFRequestHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFRequestHandler"/>
|
||||||
|
</Item73>
|
||||||
|
<Item74>
|
||||||
|
<Filename Value="..\source\uCEFResolveCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFResolveCallback"/>
|
||||||
|
</Item74>
|
||||||
|
<Item75>
|
||||||
|
<Filename Value="..\source\uCEFResourceBundle.pas"/>
|
||||||
|
<UnitName Value="uCEFResourceBundle"/>
|
||||||
|
</Item75>
|
||||||
|
<Item76>
|
||||||
|
<Filename Value="..\source\uCEFResourceBundleHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFResourceBundleHandler"/>
|
||||||
|
</Item76>
|
||||||
|
<Item77>
|
||||||
|
<Filename Value="..\source\uCEFResourceHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFResourceHandler"/>
|
||||||
|
</Item77>
|
||||||
|
<Item78>
|
||||||
|
<Filename Value="..\source\uCEFResponse.pas"/>
|
||||||
|
<UnitName Value="uCEFResponse"/>
|
||||||
|
</Item78>
|
||||||
|
<Item79>
|
||||||
|
<Filename Value="..\source\uCEFResponseFilter.pas"/>
|
||||||
|
<UnitName Value="uCEFResponseFilter"/>
|
||||||
|
</Item79>
|
||||||
|
<Item80>
|
||||||
|
<Filename Value="..\source\uCEFRunContextMenuCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFRunContextMenuCallback"/>
|
||||||
|
</Item80>
|
||||||
|
<Item81>
|
||||||
|
<Filename Value="..\source\uCEFRunFileDialogCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFRunFileDialogCallback"/>
|
||||||
|
</Item81>
|
||||||
|
<Item82>
|
||||||
|
<Filename Value="..\source\uCEFSchemeHandlerFactory.pas"/>
|
||||||
|
<UnitName Value="uCEFSchemeHandlerFactory"/>
|
||||||
|
</Item82>
|
||||||
|
<Item83>
|
||||||
|
<Filename Value="..\source\uCEFSchemeRegistrar.pas"/>
|
||||||
|
<UnitName Value="uCEFSchemeRegistrar"/>
|
||||||
|
</Item83>
|
||||||
|
<Item84>
|
||||||
|
<Filename Value="..\source\uCEFSelectClientCertificateCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFSelectClientCertificateCallback"/>
|
||||||
|
</Item84>
|
||||||
|
<Item85>
|
||||||
|
<Filename Value="..\source\uCEFSetCookieCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFSetCookieCallback"/>
|
||||||
|
</Item85>
|
||||||
|
<Item86>
|
||||||
|
<Filename Value="..\source\uCEFSslInfo.pas"/>
|
||||||
|
<UnitName Value="uCEFSslInfo"/>
|
||||||
|
</Item86>
|
||||||
|
<Item87>
|
||||||
|
<Filename Value="..\source\uCEFSSLStatus.pas"/>
|
||||||
|
<UnitName Value="uCEFSSLStatus"/>
|
||||||
|
</Item87>
|
||||||
|
<Item88>
|
||||||
|
<Filename Value="..\source\uCEFStreamReader.pas"/>
|
||||||
|
<UnitName Value="uCEFStreamReader"/>
|
||||||
|
</Item88>
|
||||||
|
<Item89>
|
||||||
|
<Filename Value="..\source\uCEFStreamWriter.pas"/>
|
||||||
|
<UnitName Value="uCEFStreamWriter"/>
|
||||||
|
</Item89>
|
||||||
|
<Item90>
|
||||||
|
<Filename Value="..\source\uCEFStringList.pas"/>
|
||||||
|
<UnitName Value="uCEFStringList"/>
|
||||||
|
</Item90>
|
||||||
|
<Item91>
|
||||||
|
<Filename Value="..\source\uCEFStringMap.pas"/>
|
||||||
|
<UnitName Value="uCEFStringMap"/>
|
||||||
|
</Item91>
|
||||||
|
<Item92>
|
||||||
|
<Filename Value="..\source\uCEFStringMultimap.pas"/>
|
||||||
|
<UnitName Value="uCEFStringMultimap"/>
|
||||||
|
</Item92>
|
||||||
|
<Item93>
|
||||||
|
<Filename Value="..\source\uCEFStringVisitor.pas"/>
|
||||||
|
<UnitName Value="uCEFStringVisitor"/>
|
||||||
|
</Item93>
|
||||||
|
<Item94>
|
||||||
|
<Filename Value="..\source\uCEFTask.pas"/>
|
||||||
|
<UnitName Value="uCEFTask"/>
|
||||||
|
</Item94>
|
||||||
|
<Item95>
|
||||||
|
<Filename Value="..\source\uCEFTaskRunner.pas"/>
|
||||||
|
<UnitName Value="uCEFTaskRunner"/>
|
||||||
|
</Item95>
|
||||||
|
<Item96>
|
||||||
|
<Filename Value="..\source\uCEFThread.pas"/>
|
||||||
|
<UnitName Value="uCEFThread"/>
|
||||||
|
</Item96>
|
||||||
|
<Item97>
|
||||||
|
<Filename Value="..\source\uCEFTypes.pas"/>
|
||||||
|
<UnitName Value="uCEFTypes"/>
|
||||||
|
</Item97>
|
||||||
|
<Item98>
|
||||||
|
<Filename Value="..\source\uCEFUrlRequest.pas"/>
|
||||||
|
<UnitName Value="uCEFUrlRequest"/>
|
||||||
|
</Item98>
|
||||||
|
<Item99>
|
||||||
|
<Filename Value="..\source\uCEFUrlrequestClient.pas"/>
|
||||||
|
<UnitName Value="uCEFUrlrequestClient"/>
|
||||||
|
</Item99>
|
||||||
|
<Item100>
|
||||||
|
<Filename Value="..\source\uCEFv8Accessor.pas"/>
|
||||||
|
<UnitName Value="uCEFv8Accessor"/>
|
||||||
|
</Item100>
|
||||||
|
<Item101>
|
||||||
|
<Filename Value="..\source\uCEFv8ArrayBufferReleaseCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFv8ArrayBufferReleaseCallback"/>
|
||||||
|
</Item101>
|
||||||
|
<Item102>
|
||||||
|
<Filename Value="..\source\uCEFv8Context.pas"/>
|
||||||
|
<UnitName Value="uCEFv8Context"/>
|
||||||
|
</Item102>
|
||||||
|
<Item103>
|
||||||
|
<Filename Value="..\source\uCEFV8Exception.pas"/>
|
||||||
|
<UnitName Value="uCEFV8Exception"/>
|
||||||
|
</Item103>
|
||||||
|
<Item104>
|
||||||
|
<Filename Value="..\source\uCEFv8Handler.pas"/>
|
||||||
|
<UnitName Value="uCEFv8Handler"/>
|
||||||
|
</Item104>
|
||||||
|
<Item105>
|
||||||
|
<Filename Value="..\source\uCEFv8Interceptor.pas"/>
|
||||||
|
<UnitName Value="uCEFv8Interceptor"/>
|
||||||
|
</Item105>
|
||||||
|
<Item106>
|
||||||
|
<Filename Value="..\source\uCEFv8StackFrame.pas"/>
|
||||||
|
<UnitName Value="uCEFv8StackFrame"/>
|
||||||
|
</Item106>
|
||||||
|
<Item107>
|
||||||
|
<Filename Value="..\source\uCEFv8StackTrace.pas"/>
|
||||||
|
<UnitName Value="uCEFv8StackTrace"/>
|
||||||
|
</Item107>
|
||||||
|
<Item108>
|
||||||
|
<Filename Value="..\source\uCEFv8Value.pas"/>
|
||||||
|
<UnitName Value="uCEFv8Value"/>
|
||||||
|
</Item108>
|
||||||
|
<Item109>
|
||||||
|
<Filename Value="..\source\uCEFValue.pas"/>
|
||||||
|
<UnitName Value="uCEFValue"/>
|
||||||
|
</Item109>
|
||||||
|
<Item110>
|
||||||
|
<Filename Value="..\source\uCEFWaitableEvent.pas"/>
|
||||||
|
<UnitName Value="uCEFWaitableEvent"/>
|
||||||
|
</Item110>
|
||||||
|
<Item111>
|
||||||
|
<Filename Value="..\source\uCEFWebPluginInfo.pas"/>
|
||||||
|
<UnitName Value="uCEFWebPluginInfo"/>
|
||||||
|
</Item111>
|
||||||
|
<Item112>
|
||||||
|
<Filename Value="..\source\uCEFWebPluginInfoVisitor.pas"/>
|
||||||
|
<UnitName Value="uCEFWebPluginInfoVisitor"/>
|
||||||
|
</Item112>
|
||||||
|
<Item113>
|
||||||
|
<Filename Value="..\source\uCEFWebPluginUnstableCallback.pas"/>
|
||||||
|
<UnitName Value="uCEFWebPluginUnstableCallback"/>
|
||||||
|
</Item113>
|
||||||
|
<Item114>
|
||||||
|
<Filename Value="..\source\uCEFWindowParent.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uCEFWindowParent"/>
|
||||||
|
</Item114>
|
||||||
|
<Item115>
|
||||||
|
<Filename Value="..\source\uCEFWorkScheduler.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uCEFWorkScheduler"/>
|
||||||
|
</Item115>
|
||||||
|
<Item116>
|
||||||
|
<Filename Value="..\source\uCEFWorkSchedulerThread.pas"/>
|
||||||
|
<UnitName Value="uCEFWorkSchedulerThread"/>
|
||||||
|
</Item116>
|
||||||
|
<Item117>
|
||||||
|
<Filename Value="..\source\uCEFWriteHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFWriteHandler"/>
|
||||||
|
</Item117>
|
||||||
|
<Item118>
|
||||||
|
<Filename Value="..\source\uCEFX509Certificate.pas"/>
|
||||||
|
<UnitName Value="uCEFX509Certificate"/>
|
||||||
|
</Item118>
|
||||||
|
<Item119>
|
||||||
|
<Filename Value="..\source\uCEFX509CertPrincipal.pas"/>
|
||||||
|
<UnitName Value="uCEFX509CertPrincipal"/>
|
||||||
|
</Item119>
|
||||||
|
<Item120>
|
||||||
|
<Filename Value="..\source\uCEFXmlReader.pas"/>
|
||||||
|
<UnitName Value="uCEFXmlReader"/>
|
||||||
|
</Item120>
|
||||||
|
<Item121>
|
||||||
|
<Filename Value="..\source\uCEFZipReader.pas"/>
|
||||||
|
<UnitName Value="uCEFZipReader"/>
|
||||||
|
</Item121>
|
||||||
|
<Item122>
|
||||||
|
<Filename Value="..\source\uCEFChromium.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uCEFChromium"/>
|
||||||
|
</Item122>
|
||||||
|
<Item123>
|
||||||
|
<Filename Value="..\source\uBufferPanel.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uBufferPanel"/>
|
||||||
|
</Item123>
|
||||||
|
<Item124>
|
||||||
|
<Filename Value="..\source\uCEFServer.pas"/>
|
||||||
|
<UnitName Value="uCEFServer"/>
|
||||||
|
</Item124>
|
||||||
|
<Item125>
|
||||||
|
<Filename Value="..\source\uCEFServerComponent.pas"/>
|
||||||
|
<HasRegisterProc Value="True"/>
|
||||||
|
<UnitName Value="uCEFServerComponent"/>
|
||||||
|
</Item125>
|
||||||
|
<Item126>
|
||||||
|
<Filename Value="..\source\uCEFServerEvents.pas"/>
|
||||||
|
<UnitName Value="uCEFServerEvents"/>
|
||||||
|
</Item126>
|
||||||
|
<Item127>
|
||||||
|
<Filename Value="..\source\uCEFServerHandler.pas"/>
|
||||||
|
<UnitName Value="uCEFServerHandler"/>
|
||||||
|
</Item127>
|
||||||
|
<Item128>
|
||||||
|
<Filename Value="..\source\tbufferpanel.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item128>
|
||||||
|
<Item129>
|
||||||
|
<Filename Value="..\source\tcefservercomponent.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item129>
|
||||||
|
<Item130>
|
||||||
|
<Filename Value="..\source\tcefwindowparent.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item130>
|
||||||
|
<Item131>
|
||||||
|
<Filename Value="..\source\tcefworkscheduler.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item131>
|
||||||
|
<Item132>
|
||||||
|
<Filename Value="..\source\tchromium.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item132>
|
||||||
|
<Item133>
|
||||||
|
<Filename Value="..\source\tchromiumwindow.lrs"/>
|
||||||
|
<Type Value="LRS"/>
|
||||||
|
</Item133>
|
||||||
|
</Files>
|
||||||
|
<RequiredPkgs Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCLBase"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPkgs>
|
||||||
|
<UsageOptions>
|
||||||
|
<UnitPath Value="$(PkgOutDir)"/>
|
||||||
|
</UsageOptions>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<CustomOptions Items="ExternHelp" Version="2">
|
||||||
|
<_ExternHelp Items="Count"/>
|
||||||
|
</CustomOptions>
|
||||||
|
</Package>
|
||||||
|
</CONFIG>
|
||||||
64
packages/cef4delphi_lazarus.pas
Normal file
64
packages/cef4delphi_lazarus.pas
Normal file
@ -0,0 +1,64 @@
|
|||||||
|
{ This file was automatically created by Lazarus. Do not edit!
|
||||||
|
This source is only used to compile and install the package.
|
||||||
|
}
|
||||||
|
|
||||||
|
unit CEF4Delphi_Lazarus;
|
||||||
|
|
||||||
|
{$warn 5023 off : no warning about unused units}
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
uCEFAccessibilityHandler, uCEFApp, uCEFApplication, uCEFAuthCallback,
|
||||||
|
uCEFBaseRefCounted, uCEFBaseScopedWrapper, uCEFBeforeDownloadCallback,
|
||||||
|
uCEFBinaryValue, uCEFBrowser, uCEFBrowserProcessHandler, uCEFCallback,
|
||||||
|
uCEFChromiumEvents, uCEFChromiumFontOptions, uCEFChromiumOptions,
|
||||||
|
uCEFChromiumWindow, uCEFClient, uCEFCommandLine, uCEFCompletionCallback,
|
||||||
|
uCEFConstants, uCEFContextMenuHandler, uCEFContextMenuParams,
|
||||||
|
uCEFCookieManager, uCEFCookieVisitor, uCEFCustomStreamReader,
|
||||||
|
uCEFDeleteCookiesCallback, uCEFDialogHandler, uCEFDictionaryValue,
|
||||||
|
uCEFDisplayHandler, uCEFDomDocument, uCEFDomNode, uCEFDomVisitor,
|
||||||
|
uCEFDownloadHandler, uCEFDownloadImageCallBack, uCEFDownLoadItem,
|
||||||
|
uCEFDownloadItemCallback, uCEFDragData, uCEFDragHandler,
|
||||||
|
uCEFEndTracingCallback, uCEFExtension, uCEFExtensionHandler,
|
||||||
|
uCEFFileDialogCallback, uCEFFindHandler, uCEFFocusHandler, uCEFFrame,
|
||||||
|
uCEFGetExtensionResourceCallback, uCEFImage, uCEFInterfaces,
|
||||||
|
uCEFJsDialogCallback, uCEFJsDialogHandler, uCEFKeyboardHandler,
|
||||||
|
uCEFLibFunctions, uCEFLifeSpanHandler, uCEFListValue, uCEFLoadHandler,
|
||||||
|
uCEFMenuModel, uCEFMenuModelDelegate, uCEFMiscFunctions,
|
||||||
|
uCEFNavigationEntry, uCEFNavigationEntryVisitor, uCEFPDFPrintCallback,
|
||||||
|
uCEFPDFPrintOptions, uCEFPostData, uCEFPostDataElement, uCEFPrintSettings,
|
||||||
|
uCEFProcessMessage, uCEFRegisterCDMCallback, uCEFRenderHandler,
|
||||||
|
uCEFRenderProcessHandler, uCEFRequest, uCEFRequestCallback,
|
||||||
|
uCEFRequestContext, uCEFRequestContextHandler, uCEFRequestHandler,
|
||||||
|
uCEFResolveCallback, uCEFResourceBundle, uCEFResourceBundleHandler,
|
||||||
|
uCEFResourceHandler, uCEFResponse, uCEFResponseFilter,
|
||||||
|
uCEFRunContextMenuCallback, uCEFRunFileDialogCallback,
|
||||||
|
uCEFSchemeHandlerFactory, uCEFSchemeRegistrar,
|
||||||
|
uCEFSelectClientCertificateCallback, uCEFSetCookieCallback, uCEFSslInfo,
|
||||||
|
uCEFSSLStatus, uCEFStreamReader, uCEFStreamWriter, uCEFStringList,
|
||||||
|
uCEFStringMap, uCEFStringMultimap, uCEFStringVisitor, uCEFTask,
|
||||||
|
uCEFTaskRunner, uCEFThread, uCEFTypes, uCEFUrlRequest, uCEFUrlrequestClient,
|
||||||
|
uCEFv8Accessor, uCEFv8ArrayBufferReleaseCallback, uCEFv8Context,
|
||||||
|
uCEFV8Exception, uCEFv8Handler, uCEFv8Interceptor, uCEFv8StackFrame,
|
||||||
|
uCEFv8StackTrace, uCEFv8Value, uCEFValue, uCEFWaitableEvent,
|
||||||
|
uCEFWebPluginInfo, uCEFWebPluginInfoVisitor, uCEFWebPluginUnstableCallback,
|
||||||
|
uCEFWindowParent, uCEFWorkScheduler, uCEFWorkSchedulerThread,
|
||||||
|
uCEFWriteHandler, uCEFX509Certificate, uCEFX509CertPrincipal, uCEFXmlReader,
|
||||||
|
uCEFZipReader, uCEFChromium, uBufferPanel, uCEFServer, uCEFServerComponent,
|
||||||
|
uCEFServerEvents, uCEFServerHandler, LazarusPackageIntf;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
procedure Register;
|
||||||
|
begin
|
||||||
|
RegisterUnit('uCEFChromiumWindow', @uCEFChromiumWindow.Register);
|
||||||
|
RegisterUnit('uCEFWindowParent', @uCEFWindowParent.Register);
|
||||||
|
RegisterUnit('uCEFWorkScheduler', @uCEFWorkScheduler.Register);
|
||||||
|
RegisterUnit('uCEFChromium', @uCEFChromium.Register);
|
||||||
|
RegisterUnit('uBufferPanel', @uBufferPanel.Register);
|
||||||
|
RegisterUnit('uCEFServerComponent', @uCEFServerComponent.Register);
|
||||||
|
end;
|
||||||
|
|
||||||
|
initialization
|
||||||
|
RegisterPackage('CEF4Delphi_Lazarus', @Register);
|
||||||
|
end.
|
||||||
BIN
packages/tbufferpanel.png
Normal file
BIN
packages/tbufferpanel.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 192 B |
BIN
packages/tcefservercomponent.png
Normal file
BIN
packages/tcefservercomponent.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 923 B |
BIN
packages/tcefwindowparent.png
Normal file
BIN
packages/tcefwindowparent.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 271 B |
BIN
packages/tcefworkscheduler.png
Normal file
BIN
packages/tcefworkscheduler.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 924 B |
BIN
packages/tchromium.png
Normal file
BIN
packages/tchromium.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 1.1 KiB |
BIN
packages/tchromiumwindow.png
Normal file
BIN
packages/tchromiumwindow.png
Normal file
Binary file not shown.
|
After 
(image error) Size: 875 B |
@ -6,8 +6,7 @@ del /s /q *.identcache
|
|||||||
del /s /q *.stat
|
del /s /q *.stat
|
||||||
del /s /q *.local
|
del /s /q *.local
|
||||||
del /s /q *.~*
|
del /s /q *.~*
|
||||||
rmdir Win32\Debug
|
rmdir /S /Q Win32
|
||||||
rmdir Win32\Release
|
rmdir /S /Q backup
|
||||||
rmdir Win32
|
rmdir /S /Q __history
|
||||||
rmdir __history
|
rmdir /S /Q __recovery
|
||||||
rmdir __recovery
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2017 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2017 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -40,11 +40,6 @@
|
|||||||
|
|
||||||
{$DEFINE DELPHI_VERSION_UNKNOW}
|
{$DEFINE DELPHI_VERSION_UNKNOW}
|
||||||
|
|
||||||
{$IFDEF FPC}
|
|
||||||
{$DEFINE CEF_MULTI_THREADED_MESSAGE_LOOP}
|
|
||||||
{$DEFINE SUPPORTS_INLINE}
|
|
||||||
{$ENDIF}
|
|
||||||
|
|
||||||
// Delphi 5
|
// Delphi 5
|
||||||
{$IFDEF VER130}
|
{$IFDEF VER130}
|
||||||
{$UNDEF DELPHI_VERSION_UNKNOW}
|
{$UNDEF DELPHI_VERSION_UNKNOW}
|
||||||
@ -354,28 +349,31 @@
|
|||||||
{$DEFINE DELPHI25_UP}
|
{$DEFINE DELPHI25_UP}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
{$IFDEF DELPHI_VERSION_UNKNOW}
|
{$DEFINE SUPPORTS_INLINE}
|
||||||
{$DEFINE DELPHI5_UP}
|
{$ELSE}
|
||||||
{$DEFINE DELPHI6_UP}
|
{$IFDEF DELPHI_VERSION_UNKNOW}
|
||||||
{$DEFINE DELPHI7_UP}
|
{$DEFINE DELPHI5_UP}
|
||||||
{$DEFINE DELPHI8_UP}
|
{$DEFINE DELPHI6_UP}
|
||||||
{$DEFINE DELPHI9_UP}
|
{$DEFINE DELPHI7_UP}
|
||||||
{$DEFINE DELPHI10_UP}
|
{$DEFINE DELPHI8_UP}
|
||||||
{$DEFINE DELPHI11_UP}
|
{$DEFINE DELPHI9_UP}
|
||||||
{$DEFINE DELPHI12_UP}
|
{$DEFINE DELPHI10_UP}
|
||||||
{$DEFINE DELPHI14_UP}
|
{$DEFINE DELPHI11_UP}
|
||||||
{$DEFINE DELPHI15_UP}
|
{$DEFINE DELPHI12_UP}
|
||||||
{$DEFINE DELPHI16_UP}
|
{$DEFINE DELPHI14_UP}
|
||||||
{$DEFINE DELPHI17_UP}
|
{$DEFINE DELPHI15_UP}
|
||||||
{$DEFINE DELPHI18_UP}
|
{$DEFINE DELPHI16_UP}
|
||||||
{$DEFINE DELPHI19_UP}
|
{$DEFINE DELPHI17_UP}
|
||||||
{$DEFINE DELPHI20_UP}
|
{$DEFINE DELPHI18_UP}
|
||||||
{$DEFINE DELPHI21_UP}
|
{$DEFINE DELPHI19_UP}
|
||||||
{$DEFINE DELPHI22_UP}
|
{$DEFINE DELPHI20_UP}
|
||||||
{$DEFINE DELPHI23_UP}
|
{$DEFINE DELPHI21_UP}
|
||||||
{$DEFINE DELPHI24_UP}
|
{$DEFINE DELPHI22_UP}
|
||||||
{$DEFINE DELPHI25_UP}
|
{$DEFINE DELPHI23_UP}
|
||||||
|
{$DEFINE DELPHI24_UP}
|
||||||
|
{$DEFINE DELPHI25_UP}
|
||||||
|
{$ENDIF}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFDEF DELPHI9_UP}
|
{$IFDEF DELPHI9_UP}
|
||||||
|
|||||||
9
source/tbufferpanel.lrs
Normal file
9
source/tbufferpanel.lrs
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
LazarusResources.Add('tbufferpanel','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#11#19#0#0#11#19#1#0#154#156#24#0#0#0#7'tIME'#7#226#5#11#10
|
||||||
|
+#31#1'?s'#163#134#0#0#0'_IDAT8'#203#237#149#177#13#192'@'#8#3#237'('#3'y'#255
|
||||||
|
+')'#204'D'#164'x'#233#147#250#161#137#132#11#228#234'd('#12'QSf.s'#3#176'}F'
|
||||||
|
+#145#180#253#133'&UA$#'#130'd'#21#180#206'b'#187'g5I='#160'I4'#137'&'#209#255
|
||||||
|
+#18#177#165#143#0'p'#183'7'#201'Jy'#191#160#136#168#254#147#165'oo'#30#204#7
|
||||||
|
+#197#194'RJ]'#169#215#177#0#0#0#0'IEND'#174'B`'#130
|
||||||
|
]);
|
||||||
39
source/tcefservercomponent.lrs
Normal file
39
source/tcefservercomponent.lrs
Normal file
@ -0,0 +1,39 @@
|
|||||||
|
LazarusResources.Add('tcefservercomponent','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#13#215#0#0#13#215#1'B('#155'x'#0#0#0#7'tIME'#7#226#5#11#10
|
||||||
|
+' (%'#31#17#214#0#0#3':IDAT8'#203#205'T]O#e'#20'>'#239#204#180'3'#210#233'n'
|
||||||
|
+#165#166#4#136'Ea'#145'&B*'#169'F'#8#152#172'B'#137'!ao'#12#23#198'{'#255#131
|
||||||
|
+#255#193'+'#255#3#198#11'oH'#16'#LbH(K'#22#200'*'#141#13'Q'#145'B'#150'Rh('
|
||||||
|
+#237'0'#157#175#247#227#236#197#140'M'#183'&'#155#221#132#11#207#213#204'y'
|
||||||
|
+#207#251#188#231'<'#207'9'#135' "'#220#133'IpG'#166#188#252#24#17#183#183#183
|
||||||
|
+#207#206#206#186#252#154#166#205#206#206#246#245#245#189'jF'#133'BA D{'#238
|
||||||
|
+'G'#180#184#172#198'H'#164#7'dMH*Q'#180#205#205#205#215#200#232#226#226#2'%m'
|
||||||
|
+'|b'#210#181#221'{'#201#4'" ""'#238#237'?M'#165'R'#221'@WWW'#134'a'#180'Y'''
|
||||||
|
+#132',..&'#18#137#224#151#163#248#246#251#199'>'#229#148'q'#202'8c'#194'g'
|
||||||
|
+#252#29#253#230#139#249#236#11'@'#142#227#236#239#239'///w'#202#183#190#190
|
||||||
|
+'>??'#175#235':'#0#8#206#175#155'6c'#130'2'#238'3'#238#186#212'lyo'#245#219
|
||||||
|
+']r'#203#185'\nnn'#206'q'#28#218'a'#163#163#163#134'ad2'#153'R'#169#228'3'
|
||||||
|
+#248#233#201#229#205#173#227#219#205#183'{n'#222#140#222#246#197#220#228#27
|
||||||
|
+#212'm5'#203#229'r'#177'Xl6'#155#233'tZa'#140#149'J%'#203#178':'#225#227#241
|
||||||
|
+'8'#165'4,Mp'#203#246#0#224#203#135#247's'#217')'#203'j'#9'!'#4'"'#138#192
|
||||||
|
+#208#167#172'P(('#129#198'/'#225'{<'#243#224#235#207'j'#0#144#25#30#180#153
|
||||||
|
+#156#157#152#140'j*J2e'#28#17'|'#198#127#219#219#209#20#174#0'@oo/c'#172#243
|
||||||
|
+'r2'#153'<99'#1#128't:m'#221#154#143'>'#255#20#17#203#229#242#147'?'#254#154
|
||||||
|
+#24'y'#215'k'#217'{'#127'V'#127#252#245#136'2'#225'S'#246#213''''#137'P'#181
|
||||||
|
+#235#235'kY'#150';'#129'j'#181'ZH'#161',W'#171#213'J'#165#18'4'#161#231#210
|
||||||
|
+#247#198#210#0#176#241#244'Y'#189#233'X'#182'g'#218#158#224#247#0#164'0'#163
|
||||||
|
+'j'#181'J'#8'i'#215#216#223#223#127'zz'#10#0'GGG333'#129#243#240#240#176#222
|
||||||
|
+'4'#127#248#229'wD|\<{v'#213#8#194'9'#231'!P4'#26'EDJ)"'#18'B'#132#16#158#231
|
||||||
|
+#5#151'GFFVVV'#132#16#154#166#13#14#14#218#142#247#205'w?w'#145#200#133#8'K'
|
||||||
|
+#171#213'j'#245'z='#30#143#147#127'M'#146#194#209#153#158#158'f'#140'Y'#150
|
||||||
|
+#149#207#231#215#214#214#30'~8<>'#220#232#2#250'h'#242#253#127#142#255'V'#2
|
||||||
|
+'F5M'#3#128'H$'#18'|'#4#173#24'N'#163'$'#17'B'#20'E1M'#243#227#220#7#178','#7
|
||||||
|
+'S'#18#200#141#136#231#231#231'CCC'#161#252#158#231#17'B|'#223'o'#181'Z'#1
|
||||||
|
+#175#151#151#151';;;'#0'p||'#172'i'#154'a'#24#142#227#148'J%'#206'y{1'#4#243
|
||||||
|
+'D'#8'I'#165'R'#225#208#186#174#219'%'#28#165'4'#232#210'X,'#150#205'fwww'
|
||||||
|
+#147#201'd.'#151'k'#7#152#166#25'<'#169#170#234#214#214#150#210'h4t]'#31#24
|
||||||
|
+#24' '#132#180#131't]WUuaa!X'#0#149'Jejj'#234#224#224'`uu'#245#191#29#171#170
|
||||||
|
+'j>'#159''''#27#27#27#197'bQ'#8#209'u<66'#182#180#180#244#234#27#146#180#133
|
||||||
|
+#127#193'KH$'#18'y'#173'UK'#254'w'#203#255#206#128#158#3' !'#207#160'u0#'#31
|
||||||
|
+#0#0#0#0'IEND'#174'B`'#130
|
||||||
|
]);
|
||||||
13
source/tcefwindowparent.lrs
Normal file
13
source/tcefwindowparent.lrs
Normal file
@ -0,0 +1,13 @@
|
|||||||
|
LazarusResources.Add('tcefwindowparent','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#13#215#0#0#13#215#1'B('#155'x'#0#0#0#7'tIME'#7#226#5#11#10
|
||||||
|
+#31'&'#154'y'#22#237#0#0#0#174'IDAT8'#203#173#148';'#14#196' '#12'D'#241#136
|
||||||
|
+#130#179' q'#255'+'#144#27#228#20'i'#144#136#20'18'#5#171#253#148#27#219#189
|
||||||
|
+#159#158#199#150'EU'#131'G'#197#214#218#190#239'FJ'#206'9'#212'ZI'#170#161'H'
|
||||||
|
+#214'ZA'#18#128'E'#7#0'I'#4#167'r'#3#197#16#194#156#211#7#180'2{'#140#16#145
|
||||||
|
+#143#145#15'HU-'#211#173#165#199'E!i'#9'HU_'#163'Y'#140#188'G'#179#27#173#222
|
||||||
|
+#184'('#150#140#0#204'9'#253#140#236#25#173#27't52f'#244#3#178#27#249#189#145
|
||||||
|
+#235#186#0#164#148','#151#221'{'#151#227'8'#182'm;'#207's'#140#241#239#15#16
|
||||||
|
+#17#17'I)'#149'R'#228#187#249'AR'#239#127#127#3#232'x'#222'a'#127#10#207#215
|
||||||
|
+#0#0#0#0'IEND'#174'B`'#130
|
||||||
|
]);
|
||||||
40
source/tcefworkscheduler.lrs
Normal file
40
source/tcefworkscheduler.lrs
Normal file
@ -0,0 +1,40 @@
|
|||||||
|
LazarusResources.Add('tcefworkscheduler','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#13#215#0#0#13#215#1'B('#155'x'#0#0#0#7'tIME'#7#226#5#11#10
|
||||||
|
+#31'4i'#192'g'#165#0#0#3';IDAT8'#203#173'U'#205'O'#227'F'#20#159'7'#227#196
|
||||||
|
+#31#17#182#217'%'#144#8#162#174'r'#235#194#17'q'#232#30#224#4'R'#247#216'p'
|
||||||
|
+#239'j'#213#3#255#206#246#180#221#254#29#28'8q'#5#129#132#132'XP'#18#208#2'q'
|
||||||
|
+#182#145'HHld'#207#216#243#209#195'T'#238'bR'#218'C'#223'i'#230#141#231#233
|
||||||
|
+#247'1'#239#25#148'R'#232#255#8'#_]^^'#222#223#223'c'#140#17'BB'#8')'#165'RJ'
|
||||||
|
+'J)'#132#208#153'<'#169#23'B'#136'Z'#173#182#182#182'V,$'#132'h6'#155#249#22
|
||||||
|
+#0'4X'#0'(dt('#165#186#221#238#20'D'#132#144#219#219#219'0'#12#1#160#209'h '
|
||||||
|
+#132#162'('#138#162#8'!'#164#183#133#0#0'B'#200#148'B'#250#236'i'#228#160'rh'
|
||||||
|
+#255#162#145#148#146#16'bY'#22#0'DQ'#164#137'X'#150#165#233'`'#140#25'c'#140
|
||||||
|
+'1'#132#144#235#186#207#21#210#23#178','#3#128','#203#132#16#221'n'#151'R'
|
||||||
|
+#170'K'#167'iZ'#169'T'#154#205'&!'#196#247#253#167'^'#227'o'#17#229'\'#226'8'
|
||||||
|
+'>991'#12'CJ'#153#166','#203'2'#206'9c'#236#224#224' '#142'c'#0#192#24'k'#127
|
||||||
|
+#167'#'#210'U'#164#148#237'v'#219'q'#28#140#225#205#155#31'L'#179#140'1'#166
|
||||||
|
+#148'}'#249'r'#157#166#233#233#233#169#227'8'#24#227#2#193'G'#133'0'#198#0
|
||||||
|
+#208#233'tfff'#0#224#237#219#31#29#199#161#148'r'#206#165#148'/^'#204#158#157
|
||||||
|
+#153'WWW'#23#23#23#203#203#203#5#237'q'#193'5'#203#178#146'$'#9#195#240#245
|
||||||
|
+#235#239'K'#165#18#0#152#166'Y*'#149#244#251'x'#245#234';)'#229'x<'#246'}'
|
||||||
|
+#223'q'#156'o'#149'*'#138#157#166')!D'#211'L'#146#4'!'#244#225#195#175'i'#202
|
||||||
|
+'vvv'#134#195#209'x|?77www7;;['#208#27'O'#213#200'0'#12#195'0('#165#31'?'#254
|
||||||
|
+#22'E'#15#147'I'#244#254#253'/'#159'?'#159#217#182#3#0#156's'#173#247'tDRJ'
|
||||||
|
+#207#243'<'#207';::b'#140'q'#158'}'#250#244'{'#171#245'S'#181'Z'#21'BPJ5'#144
|
||||||
|
+#193'`'#144'eY'#175#215'{Nl-'#211#252#252#252'p8'#236#245#250#239#222#253#140
|
||||||
|
+'1'#30#12#6#132#16#219#182'_'#190#156#11#130'~'#154#166#11#11#11#249'C'#153
|
||||||
|
+'N-M'#211#201'd'#178#178#178#18'E'#209#245#245'u'#167's'#25#199't4'#26#233
|
||||||
|
+#142#251#250#245#143#195#195'C!'#196#198#198#134#239#251#150'e=2*'#231'y||'
|
||||||
|
+#236#186'n'#24#134#24'c'#211'4www'#203#229'2!dqqQJ'#25#4#1'cLJ'#217'j'#181
|
||||||
|
+#234#245#186'RJ)u~~'#190#186#186#250#143#212#16'B'#181'Zm{{{ooo4'#26#181#219
|
||||||
|
+'m'#157#175#215#235#155#155#155#158#231'iA'#159'kZ'#207#243'|'#223#7#128#155
|
||||||
|
+#155#27#0#216#218#218'2M'#147'R'#10#0#149'J'#133's>'#153'L'#194'0l4'#26#133
|
||||||
|
+#217'T'#28'lO{'#218#182#237'J'#165#162#205#14#195'0'#191'<'#189'i'#149'RA'#16
|
||||||
|
+'h'#180#250#11#215'u='#207'3M3'#207'('#165#202#229#178#231'y'#174#235#230#25
|
||||||
|
+#206'y'#16#4#127'#'#138#227'8'#138'"'#198#152'6'#2#0#170#213#234#211#169'fY'
|
||||||
|
+#150#30')'#185#154#140#177#135#135#135'$Il'#219#254'+'#219#239#247#247#247
|
||||||
|
+#247'{'#189'^A'#197#194#172'('#28'---'#173#175#175#215#235#245'G'#246'SJ'#147
|
||||||
|
+'$'#225#156#255#215#255#143'a8'#142#163#233'#'#132#254#4#30'`'#249'[*'#162#29
|
||||||
|
+#135#0#0#0#0'IEND'#174'B`'#130
|
||||||
|
]);
|
||||||
50
source/tchromium.lrs
Normal file
50
source/tchromium.lrs
Normal file
@ -0,0 +1,50 @@
|
|||||||
|
LazarusResources.Add('tchromium','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#11#19#0#0#11#19#1#0#154#156#24#0#0#0#7'tIME'#7#226#5#11#9
|
||||||
|
+#6#6'8Q!d'#0#0#4',IDAT8'#203#173#148#207'oTU'#20#199#207#185#247#190#247#230
|
||||||
|
+#205'L'#223#131#210'i'#25'J'#139#133'R!'#128'JX'#24#3#178'1,'#212'h'#130#11
|
||||||
|
+'w'#238't'#173'.t'#175'k'#255#5#227#206#173'k'#13'K$'#238#26#149#248#11#20#25
|
||||||
|
+'('#150#182'tf'#222#204'{'#247#221'_'#231#184#152'I'#5'A'#19#19#239#246'&'
|
||||||
|
+#159'|'#207#247'|'#207#23#245'H'#195#255#241#212#191#127'3'#243#246#160#2#132
|
||||||
|
+'N'#222'D'#196#255#6'b'#230#237'Aye'#253#247#155#155#197#221#221#154#25#16#0
|
||||||
|
+#145#23'g'#27#171#7#179#151#206#174#204#239'k='#14#197#191#141'6'#28#235'/'
|
||||||
|
+#174#253#248#245'O'#247#5#10#165#148'T'#10#1#24#0#24'|p'#206#185'@'#244#226
|
||||||
|
+#201#238#27#231'O'#228#237#230'?'#130'v'#139#241#199#159'_'#221#26#234'f'#154
|
||||||
|
+'J)'#4'N'#223'D&'#17#5'b'#31'BY'#233#133'<'#253#232#173#139#179'Y'#251#9#160
|
||||||
|
+#221#225#248#131'O'#175'l'#14't'#171#153'FRL@B '#0#2'03'#132#9#200#7#231#195
|
||||||
|
+#184#210#135'g['#159#188'si6o?'#226#145#247#254#203#239'7{;'#165'R'#170#172
|
||||||
|
+#173#20'('#133#144'b'#170#135#1#246'@'#129#136#136#165#138'n'#239#140'?'#251
|
||||||
|
+'j'#253#221#203'/('#165#166' f'#190'?(o'#149#209#145#165#229#222#157';'#160
|
||||||
|
+'$'#17'; '#0'xzy'#254#208'\'#6#0#158#192#19#2#0'"'#8#1#2'Q'#10'4'#206#22#165
|
||||||
|
+#222#159#181#17'Q'#1'@'#8#225#155'['#3#129'x'#242#196'j'#175'w'#215'9'#31'E*'
|
||||||
|
+'M'#162#183'_{'#222'R'#2'B'#8'D'#4'^:'#144'<('#3'#&'#17#166#145'L"'#164#224
|
||||||
|
+#183'+'#147#181#130#154#168'2'#198#220#29'x'#169#210'('#146#199#143#175#174
|
||||||
|
+#175#127#155'6'#27#239#191'y'#241#231'{'#30#165#137#148#0'@'#31#168#183'U'
|
||||||
|
+#189'|n'#190'r'#28#169#233#238#3#202#186#22#198#24#165#148#0#0'km'#223#8')'#5
|
||||||
|
+#0#28';'#186#212'j'#205#156'Z'#158'+'#180#24'i'#167'k_jWi'#167'k7*'#221'w'
|
||||||
|
+#191#13'gR'#185#183'))%Ie'#173#5#0#197#204#187#165'cff'#0#0#165#196#233'3'''
|
||||||
|
+#215#246#249'_'#255'(u'#237#189'"!'#16#0#136'!'#4#186#177'1'#186'pz'#174'v'
|
||||||
|
+#244'Pz'#193'8?'#5'y'#239#136#153#136#153#1#17#150#151#22#22'3'#218#188'1'#26
|
||||||
|
+#215'>'#146'('#4'"'#0'1'#248'@'#129'HI'#241'0'#133#152'='#17'3+'#0#200#26'"'
|
||||||
|
+#16#7'bb'#150#136'R`;'#207#142','#132#171'?'#236'()$'#2#0#18#179'''^'#233'6k'
|
||||||
|
+#23#246'@'#196#236#2'+'#197#204','#16'QI'#213#2'c'#172#243#129'&'#3'^'#223'('
|
||||||
|
+#207#159#154'7!'#12'*'#219#175'\'#191#178#253#202#218#16'.=7?'#212#254#161
|
||||||
|
+#161#130#211#149#20#18#17#5'"*'#165#230#26#193#24#231'='#237#177#214'7'#170
|
||||||
|
+#247'^_;{4'#183'!'#216#16#206#29#203'?'#188#188#166#226'i'#128#25' '#16'k'
|
||||||
|
+#227#216'j'#165#212'4Gq'#28#159#237'F7~!'#235'ir'#213'J'#138#173#194'n'#21
|
||||||
|
+#240#236#218#252#133'3'#221'@T'#232#176#163#233'P'#227'/'#138#241'T'#26'ZP.'
|
||||||
|
+#142#227'i'#178#147'$Y'#236'dO'#245#238#223'.'#1'Z'#233#196'B%'#133'@'#188
|
||||||
|
+#185'm'#0#192#216#144#167#242'x'#183'9]'#31#177#241#212#31#213#190#216':p'
|
||||||
|
+#168#157'$'#9#0#136'I'#28#178#153#236#194'J'#163'Az4'#214#181#13#198#6'c'#189
|
||||||
|
+'q'#193'yr'#158'B'#160'g'#150'Z'#204#224#194'DH'#216#25#234'bX'#28'nR6'#147
|
||||||
|
+'I)'#167' DL'#211'tq'#161#243#202'JhP5'#26'W'#181#241#181#9#181#245#218'x]'
|
||||||
|
+#251#165#217'$'#137#164'vT'#154'0'#212'asP'#245#135#197'a'#177'{'#176'3'#151
|
||||||
|
+#166#233#164'g'#166#230')'#165#242'<_Y'#14#175#194#198#181#222#224#246'8'#151
|
||||||
|
+#2#227'HE'#145#18#8#157','#30'T'#222'8_'#213#190#178'!'#170#182'VZ~y'#177#155
|
||||||
|
+#231#249#228#200#30#169#218'8'#142'g'#247#207'J!'#243#246'vos'#247#250#3#249
|
||||||
|
+#192'&'#131':Y'#238#180#238#245'u`'#22#182#140#252#184#171#170'n'''#239#204
|
||||||
|
+#29#204#243'|b'#243#147#171#214'{'#175#181'.FE1,'#198#229#216#24'c'#3#0'@,!I'
|
||||||
|
+#146'v'#171#157#229'Y6'#147#165'i'#186#167#229#201#160'I='#133#16#140'1'#214
|
||||||
|
+'Z'#239'=1'#1#192#164#194#227'8N'#146'DJ'#249'x'#249#255#9'w'#234#153' q'#137
|
||||||
|
+#228'z'#0#0#0#0'IEND'#174'B`'#130
|
||||||
|
]);
|
||||||
38
source/tchromiumwindow.lrs
Normal file
38
source/tchromiumwindow.lrs
Normal file
@ -0,0 +1,38 @@
|
|||||||
|
LazarusResources.Add('tchromiumwindow','PNG',[
|
||||||
|
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#24#0#0#0#24#8#2#0#0#0'o'#21#170#175
|
||||||
|
+#0#0#0#9'pHYs'#0#0#13#215#0#0#13#215#1'B('#155'x'#0#0#0#7'tIME'#7#226#5#11#10
|
||||||
|
+#31#18#187#205#226'X'#0#0#3#10'IDAT8'#203#173#149'Ml'#27'U'#16#199'g'#158'7'
|
||||||
|
+#222#197'Qk'#183'IIBl#'#156'JM'#12'V'#137#168#16'E *8Qn'#17' '#142#168#226
|
||||||
|
+#200#181#189'p'#228#128#212'['#213#3'\'#171#194#165'= TQ'#129'P'#131#26#138
|
||||||
|
+'d'#167#20'PE'#212'H'#9'_'#18'i'#226#218#241'G'#214'~'#187#222'}3'#195'a#w'
|
||||||
|
+#243'Q)'#144#206'i5o'#222'_3'#191#153'y'#139'"'#2#143#195','#215'u'#23#23#23
|
||||||
|
+#247#169'R,'#22#161'\.'#19#145#236#195#136#168'\.+"RJ'#237''''#29#165#20#17
|
||||||
|
+#237'I'#162'g'#246#192#232'Q'#7'k.\-'#223#191#241#253'M'#1#4#128#4#192#169
|
||||||
|
+#215'_}'#231#197#241#177#131#143#22'b'#230'm'#222'Oo5'#191#190'v'#205'NZ'#153
|
||||||
|
+'L'#26#5#1#128#133'ggg'#175'_'#15#222#255#224#204#187#147#187'4Z'#1#128#136
|
||||||
|
+'p'#204'.'#220'l^'#186#252#133#149't'#208'Jv'#180#239'j'#175#165#187#237#142
|
||||||
|
+'6'#146#224'D'#242#147#243#23#206']Y'#142#199'G'#3#180#153'Q'#127#154'j'#30
|
||||||
|
+#206#207#223'N$'#157#182#246#200#176#31#154#227#133#209#3#169#228'j'#203#183
|
||||||
|
+#5#6#149#12#165#7#239#222#254'a'#253#244'3'#135#156#205'+'#136#184')'#20'e'
|
||||||
|
+#20'y'#231#254#30'('#30'+'#212'j'#235'n'#167'{4w'#248#243#143#222'^m'#19#139
|
||||||
|
+'d3'#214#221#127#186':'#228#148'm'#245#180'k'#148'b'#14#251']'#3#0'+R!'#162
|
||||||
|
+#200'['#249'y!?>'#246#236'sS_~'#245#237#220#197'3'#31'_Y'#178#7#20'"z~xvfb'
|
||||||
|
+#249#129#7#28#218#142#179#244#231#253'L'#225'p'#31#144#136#168#168#180'X'#193
|
||||||
|
+'@l'#242#217#209#247'N'#191#242#203#239#27#141#166#214':'#208#186#215'r{'#183
|
||||||
|
+'~'#171#167#146#9'f'#16#129'-P'#153'w)'#141'X'#136#152#133#166'&'''#218#186
|
||||||
|
+'Wk{'#134#24#17'Z:'#232#6#6#128#1#0#1#12#131'!V'#24'+'#173#159'Q$'#20#132#20
|
||||||
|
+#24#177'mY'#217#8'_'#155#28'Zu'#189#7']'#31#1#12'K'#169#144#209#1'#'#2#3#244
|
||||||
|
+#136'@'#152#5#250#211'cE*}F'''#166#167#23#238'-'#140#28'9d)u'#227#158#251#217
|
||||||
|
+#135'/|sgMD'#222'x~'#196'0'#136#0' 4'#154#237'\6K'#180#209#135#205#204#219#25
|
||||||
|
+#189'<'#214#233't}'#207'7'#134#184#222#9#175#222'i'#13#13#165#237#212#224#210
|
||||||
|
+#154'oH'#16' 4'#208#236#132#25#232'lc'#180'} '#135#147#193'K'''#166'W'#170'u'
|
||||||
|
+#207#15'{'#129#17#162#229#170'n'#235#224#216'S'#131'!'#177#14#229#143#149'Zv'
|
||||||
|
+'|'#212#134'`'#247#129#140'o'#201'['#185#134#147'(}'#247#227#175#169''''#236
|
||||||
|
+'t'#250'`h'#248#228#241#225#182'G'#213'zk'#221#13#158#206#231'rV3'#190'T'#15
|
||||||
|
+#187#22'g'#20#217#169#145'F'#241#205#137#185'j'#166'2'#255#211#147#233#129
|
||||||
|
+#191'V'#209#13'h'#234'h'#225#228#145#214#1#171#190'5v'#171#208#206#189#29#182
|
||||||
|
+'{3'#249#234'L>'#23#243'U'#1'`G <d'#244'x'#222#236' '#8#148'R'#142#227#252'o'
|
||||||
|
+#9'D'#212'Zc'#163#209#168'T*'#158#231#25'c'#254#235#31#5#17#17#209'q'#156'R'
|
||||||
|
+#169#132#241#203';I'#237#229#193#142'>'#254#5'Ixq'#26'FW'#221'b'#0#0#0#0'IEN'
|
||||||
|
+'D'#174'B`'#130
|
||||||
|
]);
|
||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uBufferPanel;
|
unit uBufferPanel;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$I cef.inc}
|
{$I cef.inc}
|
||||||
|
|
||||||
interface
|
interface
|
||||||
@ -46,8 +50,13 @@ uses
|
|||||||
{$IFDEF MSWINDOWS}Winapi.Windows, Winapi.Messages, Vcl.ExtCtrls, Vcl.Controls, Vcl.Graphics,{$ENDIF}
|
{$IFDEF MSWINDOWS}Winapi.Windows, Winapi.Messages, Vcl.ExtCtrls, Vcl.Controls, Vcl.Graphics,{$ENDIF}
|
||||||
System.Classes, System.SyncObjs, System.SysUtils;
|
System.Classes, System.SyncObjs, System.SysUtils;
|
||||||
{$ELSE}
|
{$ELSE}
|
||||||
Windows, Messages, Classes, Controls,
|
Windows, Classes, Forms, Controls, Graphics,
|
||||||
ExtCtrls, Graphics, SyncObjs, SysUtils;
|
{$IFDEF FPC}
|
||||||
|
LCLProc, LCLType, LCLIntf, LResources, LMessages, InterfaceBase,
|
||||||
|
{$ELSE}
|
||||||
|
Messages,
|
||||||
|
{$ENDIF}
|
||||||
|
ExtCtrls, SyncObjs, SysUtils;
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
type
|
type
|
||||||
@ -98,9 +107,16 @@ type
|
|||||||
property Alignment;
|
property Alignment;
|
||||||
property Anchors;
|
property Anchors;
|
||||||
property AutoSize;
|
property AutoSize;
|
||||||
|
{$IFNDEF FPC}
|
||||||
property BevelEdges;
|
property BevelEdges;
|
||||||
property BevelInner;
|
|
||||||
property BevelKind;
|
property BevelKind;
|
||||||
|
property Ctl3D;
|
||||||
|
property Locked;
|
||||||
|
property ParentBackground;
|
||||||
|
property ParentCtl3D;
|
||||||
|
property OnCanResize;
|
||||||
|
{$ENDIF}
|
||||||
|
property BevelInner;
|
||||||
property BevelOuter;
|
property BevelOuter;
|
||||||
property BevelWidth;
|
property BevelWidth;
|
||||||
property BiDiMode;
|
property BiDiMode;
|
||||||
@ -109,7 +125,6 @@ type
|
|||||||
property Caption;
|
property Caption;
|
||||||
property Color;
|
property Color;
|
||||||
property Constraints;
|
property Constraints;
|
||||||
property Ctl3D;
|
|
||||||
property UseDockManager default True;
|
property UseDockManager default True;
|
||||||
property DockSite;
|
property DockSite;
|
||||||
property DoubleBuffered;
|
property DoubleBuffered;
|
||||||
@ -119,11 +134,8 @@ type
|
|||||||
property Enabled;
|
property Enabled;
|
||||||
property FullRepaint;
|
property FullRepaint;
|
||||||
property Font;
|
property Font;
|
||||||
property Locked;
|
|
||||||
property ParentBiDiMode;
|
property ParentBiDiMode;
|
||||||
property ParentBackground;
|
|
||||||
property ParentColor;
|
property ParentColor;
|
||||||
property ParentCtl3D;
|
|
||||||
property ParentFont;
|
property ParentFont;
|
||||||
property ParentShowHint;
|
property ParentShowHint;
|
||||||
property PopupMenu;
|
property PopupMenu;
|
||||||
@ -131,7 +143,6 @@ type
|
|||||||
property TabOrder;
|
property TabOrder;
|
||||||
property TabStop;
|
property TabStop;
|
||||||
property Visible;
|
property Visible;
|
||||||
property OnCanResize;
|
|
||||||
property OnClick;
|
property OnClick;
|
||||||
property OnConstrainedResize;
|
property OnConstrainedResize;
|
||||||
property OnContextPopup;
|
property OnContextPopup;
|
||||||
@ -179,6 +190,10 @@ type
|
|||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
procedure Register;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
@ -396,4 +411,12 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
procedure Register;
|
||||||
|
begin
|
||||||
|
{$I tbufferpanel.lrs}
|
||||||
|
RegisterComponents('Chromium', [TBufferPanel]);
|
||||||
|
end;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFAccessibilityHandler;
|
unit uCEFAccessibilityHandler;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -107,8 +111,8 @@ begin
|
|||||||
|
|
||||||
with PCEFAccessibilityHandler(FData)^ do
|
with PCEFAccessibilityHandler(FData)^ do
|
||||||
begin
|
begin
|
||||||
on_accessibility_tree_change := cef_accessibility_handler_on_accessibility_tree_change;
|
on_accessibility_tree_change := {$IFDEF FPC}@{$ENDIF}cef_accessibility_handler_on_accessibility_tree_change;
|
||||||
on_accessibility_location_change := cef_accessibility_handler_on_accessibility_location_change;
|
on_accessibility_location_change := {$IFDEF FPC}@{$ENDIF}cef_accessibility_handler_on_accessibility_location_change;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFApp;
|
unit uCEFApp;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -198,11 +202,11 @@ begin
|
|||||||
|
|
||||||
with PCefApp(FData)^ do
|
with PCefApp(FData)^ do
|
||||||
begin
|
begin
|
||||||
on_before_command_line_processing := cef_app_on_before_command_line_processing;
|
on_before_command_line_processing := {$IFDEF FPC}@{$ENDIF}cef_app_on_before_command_line_processing;
|
||||||
on_register_custom_schemes := cef_app_on_register_custom_schemes;
|
on_register_custom_schemes := {$IFDEF FPC}@{$ENDIF}cef_app_on_register_custom_schemes;
|
||||||
get_resource_bundle_handler := cef_app_get_resource_bundle_handler;
|
get_resource_bundle_handler := {$IFDEF FPC}@{$ENDIF}cef_app_get_resource_bundle_handler;
|
||||||
get_browser_process_handler := cef_app_get_browser_process_handler;
|
get_browser_process_handler := {$IFDEF FPC}@{$ENDIF}cef_app_get_browser_process_handler;
|
||||||
get_render_process_handler := cef_app_get_render_process_handler;
|
get_render_process_handler := {$IFDEF FPC}@{$ENDIF}cef_app_get_render_process_handler;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright Š 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFApplication;
|
unit uCEFApplication;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -126,7 +130,7 @@ type
|
|||||||
FDisableWebSecurity : boolean;
|
FDisableWebSecurity : boolean;
|
||||||
FChromeVersionInfo : TFileVersionInfo;
|
FChromeVersionInfo : TFileVersionInfo;
|
||||||
FLibHandle : THandle;
|
FLibHandle : THandle;
|
||||||
FOnRegisterCustomSchemes : TOnRegisterCustomSchemes;
|
FOnRegisterCustomSchemes : TOnRegisterCustomSchemesEvent;
|
||||||
FAppSettings : TCefSettings;
|
FAppSettings : TCefSettings;
|
||||||
FDeviceScaleFactor : single;
|
FDeviceScaleFactor : single;
|
||||||
FCheckDevToolsResources : boolean;
|
FCheckDevToolsResources : boolean;
|
||||||
@ -135,7 +139,7 @@ type
|
|||||||
FMissingLibFiles : string;
|
FMissingLibFiles : string;
|
||||||
FProcessType : TCefProcessType;
|
FProcessType : TCefProcessType;
|
||||||
FShutdownWaitTime : cardinal;
|
FShutdownWaitTime : cardinal;
|
||||||
FWidevinePath : string;
|
FWidevinePath : ustring;
|
||||||
FMustFreeLibrary : boolean;
|
FMustFreeLibrary : boolean;
|
||||||
|
|
||||||
FMustCreateResourceBundleHandler : boolean;
|
FMustCreateResourceBundleHandler : boolean;
|
||||||
@ -346,11 +350,11 @@ type
|
|||||||
property Status : TCefAplicationStatus read FStatus;
|
property Status : TCefAplicationStatus read FStatus;
|
||||||
property MissingLibFiles : string read FMissingLibFiles;
|
property MissingLibFiles : string read FMissingLibFiles;
|
||||||
property ShutdownWaitTime : cardinal read FShutdownWaitTime write FShutdownWaitTime;
|
property ShutdownWaitTime : cardinal read FShutdownWaitTime write FShutdownWaitTime;
|
||||||
property WidevinePath : string read FWidevinePath write FWidevinePath;
|
property WidevinePath : ustring read FWidevinePath write FWidevinePath;
|
||||||
property MustFreeLibrary : boolean read FMustFreeLibrary write FMustFreeLibrary;
|
property MustFreeLibrary : boolean read FMustFreeLibrary write FMustFreeLibrary;
|
||||||
property ChildProcessesCount : integer read GetChildProcessesCount;
|
property ChildProcessesCount : integer read GetChildProcessesCount;
|
||||||
|
|
||||||
property OnRegCustomSchemes : TOnRegisterCustomSchemes read FOnRegisterCustomSchemes write FOnRegisterCustomSchemes;
|
property OnRegCustomSchemes : TOnRegisterCustomSchemesEvent read FOnRegisterCustomSchemes write FOnRegisterCustomSchemes;
|
||||||
|
|
||||||
// ICefBrowserProcessHandler
|
// ICefBrowserProcessHandler
|
||||||
property OnContextInitialized : TOnContextInitializedEvent read FOnContextInitialized write FOnContextInitialized;
|
property OnContextInitialized : TOnContextInitializedEvent read FOnContextInitialized write FOnContextInitialized;
|
||||||
@ -387,7 +391,12 @@ uses
|
|||||||
{$IFDEF DELPHI16_UP}
|
{$IFDEF DELPHI16_UP}
|
||||||
System.Math, System.IOUtils, System.SysUtils, {$IFDEF MSWINDOWS}WinApi.TlHelp32,{$ENDIF}
|
System.Math, System.IOUtils, System.SysUtils, {$IFDEF MSWINDOWS}WinApi.TlHelp32,{$ENDIF}
|
||||||
{$ELSE}
|
{$ELSE}
|
||||||
Math, {$IFDEF DELPHI14_UP}IOUtils,{$ENDIF} SysUtils, {$IFDEF MSWINDOWS}TlHelp32,{$ENDIF}
|
Math, {$IFDEF DELPHI14_UP}IOUtils,{$ENDIF} SysUtils,
|
||||||
|
{$IFDEF FPC}
|
||||||
|
jwatlhelp32,
|
||||||
|
{$ELSE}
|
||||||
|
TlHelp32,
|
||||||
|
{$ENDIF}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
uCEFLibFunctions, uCEFMiscFunctions, uCEFCommandLine, uCEFConstants,
|
uCEFLibFunctions, uCEFMiscFunctions, uCEFCommandLine, uCEFConstants,
|
||||||
uCEFSchemeHandlerFactory, uCEFCookieManager, uCEFApp, uCEFRegisterCDMCallback;
|
uCEFSchemeHandlerFactory, uCEFCookieManager, uCEFApp, uCEFRegisterCDMCallback;
|
||||||
@ -818,7 +827,7 @@ begin
|
|||||||
if FLibLoaded and
|
if FLibLoaded and
|
||||||
not(FMultiThreadedMessageLoop) and
|
not(FMultiThreadedMessageLoop) and
|
||||||
FExternalMessagePump then
|
FExternalMessagePump then
|
||||||
cef_do_message_loop_work;
|
cef_do_message_loop_work();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefApplication.RunMessageLoop;
|
procedure TCefApplication.RunMessageLoop;
|
||||||
@ -826,7 +835,7 @@ begin
|
|||||||
if FLibLoaded and
|
if FLibLoaded and
|
||||||
not(FMultiThreadedMessageLoop) and
|
not(FMultiThreadedMessageLoop) and
|
||||||
not(FExternalMessagePump) then
|
not(FExternalMessagePump) then
|
||||||
cef_run_message_loop;
|
cef_run_message_loop();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefApplication.QuitMessageLoop;
|
procedure TCefApplication.QuitMessageLoop;
|
||||||
@ -834,7 +843,7 @@ begin
|
|||||||
if FLibLoaded and
|
if FLibLoaded and
|
||||||
not(FMultiThreadedMessageLoop) and
|
not(FMultiThreadedMessageLoop) and
|
||||||
not(FExternalMessagePump) then
|
not(FExternalMessagePump) then
|
||||||
cef_quit_message_loop;
|
cef_quit_message_loop();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefApplication.SetOsmodalLoop(aValue : boolean);
|
procedure TCefApplication.SetOsmodalLoop(aValue : boolean);
|
||||||
@ -851,7 +860,7 @@ procedure TCefApplication.ShutDown;
|
|||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
FStatus := asShuttingDown;
|
FStatus := asShuttingDown;
|
||||||
if FLibLoaded then cef_shutdown;
|
if FLibLoaded then cef_shutdown();
|
||||||
except
|
except
|
||||||
on e : exception do
|
on e : exception do
|
||||||
if CustomExceptionHandler('TCefApplication.ShutDown', e) then raise;
|
if CustomExceptionHandler('TCefApplication.ShutDown', e) then raise;
|
||||||
@ -882,7 +891,7 @@ begin
|
|||||||
try
|
try
|
||||||
if (aApp <> nil) then
|
if (aApp <> nil) then
|
||||||
begin
|
begin
|
||||||
TempArgs.instance := HINSTANCE;
|
TempArgs.instance := HINSTANCE{$IFDEF FPC}(){$ENDIF};
|
||||||
Result := cef_execute_process(@TempArgs, aApp.Wrap, FWindowsSandboxInfo);
|
Result := cef_execute_process(@TempArgs, aApp.Wrap, FWindowsSandboxInfo);
|
||||||
end;
|
end;
|
||||||
except
|
except
|
||||||
@ -1130,7 +1139,7 @@ begin
|
|||||||
InitializeCookies;
|
InitializeCookies;
|
||||||
FGlobalContextInitialized := True;
|
FGlobalContextInitialized := True;
|
||||||
|
|
||||||
if assigned(FOnContextInitialized) then FOnContextInitialized;
|
if assigned(FOnContextInitialized) then FOnContextInitialized();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefApplication.Internal_OnBeforeChildProcessLaunch(const commandLine: ICefCommandLine);
|
procedure TCefApplication.Internal_OnBeforeChildProcessLaunch(const commandLine: ICefCommandLine);
|
||||||
@ -1176,7 +1185,7 @@ end;
|
|||||||
|
|
||||||
procedure TCefApplication.Internal_OnWebKitInitialized;
|
procedure TCefApplication.Internal_OnWebKitInitialized;
|
||||||
begin
|
begin
|
||||||
if assigned(FOnWebKitInitialized) then FOnWebKitInitialized;
|
if assigned(FOnWebKitInitialized) then FOnWebKitInitialized();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefApplication.Internal_OnBrowserCreated(const browser: ICefBrowser);
|
procedure TCefApplication.Internal_OnBrowserCreated(const browser: ICefBrowser);
|
||||||
@ -1471,7 +1480,7 @@ begin
|
|||||||
FLibLoaded := True;
|
FLibLoaded := True;
|
||||||
Result := True;
|
Result := True;
|
||||||
|
|
||||||
if FEnableHighDPISupport then cef_enable_highdpi_support;
|
if FEnableHighDPISupport then cef_enable_highdpi_support();
|
||||||
end
|
end
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
@ -1489,14 +1498,14 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_app_capi_h : boolean;
|
function TCefApplication.Load_cef_app_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_initialize := GetProcAddress(FLibHandle, 'cef_initialize');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_initialize{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_initialize');
|
||||||
cef_shutdown := GetProcAddress(FLibHandle, 'cef_shutdown');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_shutdown{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_shutdown');
|
||||||
cef_execute_process := GetProcAddress(FLibHandle, 'cef_execute_process');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_execute_process{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_execute_process');
|
||||||
cef_do_message_loop_work := GetProcAddress(FLibHandle, 'cef_do_message_loop_work');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_do_message_loop_work{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_do_message_loop_work');
|
||||||
cef_run_message_loop := GetProcAddress(FLibHandle, 'cef_run_message_loop');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_run_message_loop{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_run_message_loop');
|
||||||
cef_quit_message_loop := GetProcAddress(FLibHandle, 'cef_quit_message_loop');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_quit_message_loop{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_quit_message_loop');
|
||||||
cef_set_osmodal_loop := GetProcAddress(FLibHandle, 'cef_set_osmodal_loop');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_set_osmodal_loop{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_set_osmodal_loop');
|
||||||
cef_enable_highdpi_support := GetProcAddress(FLibHandle, 'cef_enable_highdpi_support');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_enable_highdpi_support{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_enable_highdpi_support');
|
||||||
|
|
||||||
Result := assigned(cef_initialize) and
|
Result := assigned(cef_initialize) and
|
||||||
assigned(cef_shutdown) and
|
assigned(cef_shutdown) and
|
||||||
@ -1510,8 +1519,8 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_browser_capi_h : boolean;
|
function TCefApplication.Load_cef_browser_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_browser_host_create_browser := GetProcAddress(FLibHandle, 'cef_browser_host_create_browser');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_browser_host_create_browser{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_browser_host_create_browser');
|
||||||
cef_browser_host_create_browser_sync := GetProcAddress(FLibHandle, 'cef_browser_host_create_browser_sync');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_browser_host_create_browser_sync{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_browser_host_create_browser_sync');
|
||||||
|
|
||||||
Result := assigned(cef_browser_host_create_browser) and
|
Result := assigned(cef_browser_host_create_browser) and
|
||||||
assigned(cef_browser_host_create_browser_sync);
|
assigned(cef_browser_host_create_browser_sync);
|
||||||
@ -1519,8 +1528,8 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_command_line_capi_h : boolean;
|
function TCefApplication.Load_cef_command_line_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_command_line_create := GetProcAddress(FLibHandle, 'cef_command_line_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_command_line_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_command_line_create');
|
||||||
cef_command_line_get_global := GetProcAddress(FLibHandle, 'cef_command_line_get_global');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_command_line_get_global{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_command_line_get_global');
|
||||||
|
|
||||||
Result := assigned(cef_command_line_create) and
|
Result := assigned(cef_command_line_create) and
|
||||||
assigned(cef_command_line_get_global);
|
assigned(cef_command_line_get_global);
|
||||||
@ -1528,9 +1537,9 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_cookie_capi_h : boolean;
|
function TCefApplication.Load_cef_cookie_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_cookie_manager_get_global_manager := GetProcAddress(FLibHandle, 'cef_cookie_manager_get_global_manager');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_cookie_manager_get_global_manager{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_cookie_manager_get_global_manager');
|
||||||
cef_cookie_manager_get_blocking_manager := GetProcAddress(FLibHandle, 'cef_cookie_manager_get_blocking_manager');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_cookie_manager_get_blocking_manager{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_cookie_manager_get_blocking_manager');
|
||||||
cef_cookie_manager_create_manager := GetProcAddress(FLibHandle, 'cef_cookie_manager_create_manager');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_cookie_manager_create_manager{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_cookie_manager_create_manager');
|
||||||
|
|
||||||
Result := assigned(cef_cookie_manager_get_global_manager) and
|
Result := assigned(cef_cookie_manager_get_global_manager) and
|
||||||
assigned(cef_cookie_manager_get_blocking_manager) and
|
assigned(cef_cookie_manager_get_blocking_manager) and
|
||||||
@ -1539,8 +1548,8 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_crash_util_h : boolean;
|
function TCefApplication.Load_cef_crash_util_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_crash_reporting_enabled := GetProcAddress(FLibHandle, 'cef_crash_reporting_enabled');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_crash_reporting_enabled{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_crash_reporting_enabled');
|
||||||
cef_set_crash_key_value := GetProcAddress(FLibHandle, 'cef_set_crash_key_value');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_set_crash_key_value{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_set_crash_key_value');
|
||||||
|
|
||||||
Result := assigned(cef_crash_reporting_enabled) and
|
Result := assigned(cef_crash_reporting_enabled) and
|
||||||
assigned(cef_set_crash_key_value);
|
assigned(cef_set_crash_key_value);
|
||||||
@ -1548,21 +1557,21 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_drag_data_capi_h : boolean;
|
function TCefApplication.Load_cef_drag_data_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_drag_data_create := GetProcAddress(FLibHandle, 'cef_drag_data_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_drag_data_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_drag_data_create');
|
||||||
|
|
||||||
Result := assigned(cef_drag_data_create);
|
Result := assigned(cef_drag_data_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_file_util_capi_h : boolean;
|
function TCefApplication.Load_cef_file_util_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_create_directory := GetProcAddress(FLibHandle, 'cef_create_directory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_create_directory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_create_directory');
|
||||||
cef_get_temp_directory := GetProcAddress(FLibHandle, 'cef_get_temp_directory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_temp_directory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_temp_directory');
|
||||||
cef_create_new_temp_directory := GetProcAddress(FLibHandle, 'cef_create_new_temp_directory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_create_new_temp_directory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_create_new_temp_directory');
|
||||||
cef_create_temp_directory_in_directory := GetProcAddress(FLibHandle, 'cef_create_temp_directory_in_directory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_create_temp_directory_in_directory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_create_temp_directory_in_directory');
|
||||||
cef_directory_exists := GetProcAddress(FLibHandle, 'cef_directory_exists');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_directory_exists{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_directory_exists');
|
||||||
cef_delete_file := GetProcAddress(FLibHandle, 'cef_delete_file');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_delete_file{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_delete_file');
|
||||||
cef_zip_directory := GetProcAddress(FLibHandle, 'cef_zip_directory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_zip_directory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_zip_directory');
|
||||||
cef_load_crlsets_file := GetProcAddress(FLibHandle, 'cef_load_crlsets_file');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_load_crlsets_file{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_load_crlsets_file');
|
||||||
|
|
||||||
Result := assigned(cef_create_directory) and
|
Result := assigned(cef_create_directory) and
|
||||||
assigned(cef_get_temp_directory) and
|
assigned(cef_get_temp_directory) and
|
||||||
@ -1576,23 +1585,23 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_image_capi_h : boolean;
|
function TCefApplication.Load_cef_image_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_image_create := GetProcAddress(FLibHandle, 'cef_image_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_image_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_image_create');
|
||||||
|
|
||||||
Result := assigned(cef_image_create);
|
Result := assigned(cef_image_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_menu_model_capi_h : boolean;
|
function TCefApplication.Load_cef_menu_model_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_menu_model_create := GetProcAddress(FLibHandle, 'cef_menu_model_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_menu_model_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_menu_model_create');
|
||||||
|
|
||||||
Result := assigned(cef_menu_model_create);
|
Result := assigned(cef_menu_model_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_origin_whitelist_capi_h : boolean;
|
function TCefApplication.Load_cef_origin_whitelist_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_add_cross_origin_whitelist_entry := GetProcAddress(FLibHandle, 'cef_add_cross_origin_whitelist_entry');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_add_cross_origin_whitelist_entry{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_add_cross_origin_whitelist_entry');
|
||||||
cef_remove_cross_origin_whitelist_entry := GetProcAddress(FLibHandle, 'cef_remove_cross_origin_whitelist_entry');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_remove_cross_origin_whitelist_entry{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_remove_cross_origin_whitelist_entry');
|
||||||
cef_clear_cross_origin_whitelist := GetProcAddress(FLibHandle, 'cef_clear_cross_origin_whitelist');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_clear_cross_origin_whitelist{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_clear_cross_origin_whitelist');
|
||||||
|
|
||||||
Result := assigned(cef_add_cross_origin_whitelist_entry) and
|
Result := assigned(cef_add_cross_origin_whitelist_entry) and
|
||||||
assigned(cef_remove_cross_origin_whitelist_entry) and
|
assigned(cef_remove_cross_origin_whitelist_entry) and
|
||||||
@ -1601,18 +1610,18 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_parser_capi_h : boolean;
|
function TCefApplication.Load_cef_parser_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_parse_url := GetProcAddress(FLibHandle, 'cef_parse_url');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_parse_url{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_parse_url');
|
||||||
cef_create_url := GetProcAddress(FLibHandle, 'cef_create_url');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_create_url{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_create_url');
|
||||||
cef_format_url_for_security_display := GetProcAddress(FLibHandle, 'cef_format_url_for_security_display');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_format_url_for_security_display{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_format_url_for_security_display');
|
||||||
cef_get_mime_type := GetProcAddress(FLibHandle, 'cef_get_mime_type');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_mime_type{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_mime_type');
|
||||||
cef_get_extensions_for_mime_type := GetProcAddress(FLibHandle, 'cef_get_extensions_for_mime_type');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_extensions_for_mime_type{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_extensions_for_mime_type');
|
||||||
cef_base64encode := GetProcAddress(FLibHandle, 'cef_base64encode');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_base64encode{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_base64encode');
|
||||||
cef_base64decode := GetProcAddress(FLibHandle, 'cef_base64decode');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_base64decode{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_base64decode');
|
||||||
cef_uriencode := GetProcAddress(FLibHandle, 'cef_uriencode');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_uriencode{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_uriencode');
|
||||||
cef_uridecode := GetProcAddress(FLibHandle, 'cef_uridecode');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_uridecode{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_uridecode');
|
||||||
cef_parse_json := GetProcAddress(FLibHandle, 'cef_parse_json');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_parse_json{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_parse_json');
|
||||||
cef_parse_jsonand_return_error := GetProcAddress(FLibHandle, 'cef_parse_jsonand_return_error');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_parse_jsonand_return_error{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_parse_jsonand_return_error');
|
||||||
cef_write_json := GetProcAddress(FLibHandle, 'cef_write_json');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_write_json{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_write_json');
|
||||||
|
|
||||||
Result := assigned(cef_parse_url) and
|
Result := assigned(cef_parse_url) and
|
||||||
assigned(cef_create_url) and
|
assigned(cef_create_url) and
|
||||||
@ -1630,37 +1639,37 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_path_util_capi_h : boolean;
|
function TCefApplication.Load_cef_path_util_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_get_path := GetProcAddress(FLibHandle, 'cef_get_path');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_path{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_path');
|
||||||
|
|
||||||
Result := assigned(cef_get_path);
|
Result := assigned(cef_get_path);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_print_settings_capi_h : boolean;
|
function TCefApplication.Load_cef_print_settings_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_print_settings_create := GetProcAddress(FLibHandle, 'cef_print_settings_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_print_settings_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_print_settings_create');
|
||||||
|
|
||||||
Result := assigned(cef_print_settings_create);
|
Result := assigned(cef_print_settings_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_process_message_capi_h : boolean;
|
function TCefApplication.Load_cef_process_message_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_process_message_create := GetProcAddress(FLibHandle, 'cef_process_message_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_process_message_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_process_message_create');
|
||||||
|
|
||||||
Result := assigned(cef_process_message_create);
|
Result := assigned(cef_process_message_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_process_util_capi_h : boolean;
|
function TCefApplication.Load_cef_process_util_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_launch_process := GetProcAddress(FLibHandle, 'cef_launch_process');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_launch_process{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_launch_process');
|
||||||
|
|
||||||
Result := assigned(cef_launch_process);
|
Result := assigned(cef_launch_process);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_request_capi_h : boolean;
|
function TCefApplication.Load_cef_request_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_request_create := GetProcAddress(FLibHandle, 'cef_request_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_request_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_request_create');
|
||||||
cef_post_data_create := GetProcAddress(FLibHandle, 'cef_post_data_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_post_data_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_post_data_create');
|
||||||
cef_post_data_element_create := GetProcAddress(FLibHandle, 'cef_post_data_element_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_post_data_element_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_post_data_element_create');
|
||||||
|
|
||||||
Result := assigned(cef_request_create) and
|
Result := assigned(cef_request_create) and
|
||||||
assigned(cef_post_data_create) and
|
assigned(cef_post_data_create) and
|
||||||
@ -1669,9 +1678,9 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_request_context_capi_h : boolean;
|
function TCefApplication.Load_cef_request_context_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_request_context_get_global_context := GetProcAddress(FLibHandle, 'cef_request_context_get_global_context');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_request_context_get_global_context{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_request_context_get_global_context');
|
||||||
cef_request_context_create_context := GetProcAddress(FLibHandle, 'cef_request_context_create_context');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_request_context_create_context{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_request_context_create_context');
|
||||||
cef_create_context_shared := GetProcAddress(FLibHandle, 'cef_create_context_shared');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_create_context_shared{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_create_context_shared');
|
||||||
|
|
||||||
Result := assigned(cef_request_context_get_global_context) and
|
Result := assigned(cef_request_context_get_global_context) and
|
||||||
assigned(cef_request_context_create_context) and
|
assigned(cef_request_context_create_context) and
|
||||||
@ -1680,29 +1689,29 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_resource_bundle_capi_h : boolean;
|
function TCefApplication.Load_cef_resource_bundle_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_resource_bundle_get_global := GetProcAddress(FLibHandle, 'cef_resource_bundle_get_global');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_resource_bundle_get_global{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_resource_bundle_get_global');
|
||||||
|
|
||||||
Result := assigned(cef_resource_bundle_get_global);
|
Result := assigned(cef_resource_bundle_get_global);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_response_capi_h : boolean;
|
function TCefApplication.Load_cef_response_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_response_create := GetProcAddress(FLibHandle, 'cef_response_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_response_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_response_create');
|
||||||
|
|
||||||
Result := assigned(cef_response_create);
|
Result := assigned(cef_response_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_server_capi_h : boolean;
|
function TCefApplication.Load_cef_server_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_server_create := GetProcAddress(FLibHandle, 'cef_server_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_server_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_server_create');
|
||||||
|
|
||||||
Result := assigned(cef_server_create);
|
Result := assigned(cef_server_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_scheme_capi_h : boolean;
|
function TCefApplication.Load_cef_scheme_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_register_scheme_handler_factory := GetProcAddress(FLibHandle, 'cef_register_scheme_handler_factory');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_register_scheme_handler_factory{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_register_scheme_handler_factory');
|
||||||
cef_clear_scheme_handler_factories := GetProcAddress(FLibHandle, 'cef_clear_scheme_handler_factories');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_clear_scheme_handler_factories{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_clear_scheme_handler_factories');
|
||||||
|
|
||||||
Result := assigned(cef_register_scheme_handler_factory) and
|
Result := assigned(cef_register_scheme_handler_factory) and
|
||||||
assigned(cef_clear_scheme_handler_factories);
|
assigned(cef_clear_scheme_handler_factories);
|
||||||
@ -1710,8 +1719,8 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_ssl_info_capi_h : boolean;
|
function TCefApplication.Load_cef_ssl_info_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_is_cert_status_error := GetProcAddress(FLibHandle, 'cef_is_cert_status_error');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_is_cert_status_error{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_is_cert_status_error');
|
||||||
cef_is_cert_status_minor_error := GetProcAddress(FLibHandle, 'cef_is_cert_status_minor_error');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_is_cert_status_minor_error{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_is_cert_status_minor_error');
|
||||||
|
|
||||||
Result := assigned(cef_is_cert_status_error) and
|
Result := assigned(cef_is_cert_status_error) and
|
||||||
assigned(cef_is_cert_status_minor_error);
|
assigned(cef_is_cert_status_minor_error);
|
||||||
@ -1719,11 +1728,11 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_stream_capi_h : boolean;
|
function TCefApplication.Load_cef_stream_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_stream_reader_create_for_file := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_file');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_stream_reader_create_for_file{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_file');
|
||||||
cef_stream_reader_create_for_data := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_data');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_stream_reader_create_for_data{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_data');
|
||||||
cef_stream_reader_create_for_handler := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_handler');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_stream_reader_create_for_handler{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_stream_reader_create_for_handler');
|
||||||
cef_stream_writer_create_for_file := GetProcAddress(FLibHandle, 'cef_stream_writer_create_for_file');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_stream_writer_create_for_file{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_stream_writer_create_for_file');
|
||||||
cef_stream_writer_create_for_handler := GetProcAddress(FLibHandle, 'cef_stream_writer_create_for_handler');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_stream_writer_create_for_handler{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_stream_writer_create_for_handler');
|
||||||
|
|
||||||
Result := assigned(cef_stream_reader_create_for_file) and
|
Result := assigned(cef_stream_reader_create_for_file) and
|
||||||
assigned(cef_stream_reader_create_for_data) and
|
assigned(cef_stream_reader_create_for_data) and
|
||||||
@ -1734,11 +1743,11 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_task_capi_h : boolean;
|
function TCefApplication.Load_cef_task_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_task_runner_get_for_current_thread := GetProcAddress(FLibHandle, 'cef_task_runner_get_for_current_thread');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_task_runner_get_for_current_thread{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_task_runner_get_for_current_thread');
|
||||||
cef_task_runner_get_for_thread := GetProcAddress(FLibHandle, 'cef_task_runner_get_for_thread');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_task_runner_get_for_thread{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_task_runner_get_for_thread');
|
||||||
cef_currently_on := GetProcAddress(FLibHandle, 'cef_currently_on');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_currently_on{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_currently_on');
|
||||||
cef_post_task := GetProcAddress(FLibHandle, 'cef_post_task');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_post_task{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_post_task');
|
||||||
cef_post_delayed_task := GetProcAddress(FLibHandle, 'cef_post_delayed_task');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_post_delayed_task{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_post_delayed_task');
|
||||||
|
|
||||||
Result := assigned(cef_task_runner_get_for_current_thread) and
|
Result := assigned(cef_task_runner_get_for_current_thread) and
|
||||||
assigned(cef_task_runner_get_for_thread) and
|
assigned(cef_task_runner_get_for_thread) and
|
||||||
@ -1749,16 +1758,16 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_thread_capi_h : boolean;
|
function TCefApplication.Load_cef_thread_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_thread_create := GetProcAddress(FLibHandle, 'cef_thread_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_thread_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_thread_create');
|
||||||
|
|
||||||
Result := assigned(cef_thread_create);
|
Result := assigned(cef_thread_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_trace_capi_h : boolean;
|
function TCefApplication.Load_cef_trace_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_begin_tracing := GetProcAddress(FLibHandle, 'cef_begin_tracing');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_begin_tracing{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_begin_tracing');
|
||||||
cef_end_tracing := GetProcAddress(FLibHandle, 'cef_end_tracing');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_end_tracing{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_end_tracing');
|
||||||
cef_now_from_system_trace_time := GetProcAddress(FLibHandle, 'cef_now_from_system_trace_time');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_now_from_system_trace_time{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_now_from_system_trace_time');
|
||||||
|
|
||||||
Result := assigned(cef_begin_tracing) and
|
Result := assigned(cef_begin_tracing) and
|
||||||
assigned(cef_end_tracing) and
|
assigned(cef_end_tracing) and
|
||||||
@ -1767,30 +1776,30 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_urlrequest_capi_h : boolean;
|
function TCefApplication.Load_cef_urlrequest_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_urlrequest_create := GetProcAddress(FLibHandle, 'cef_urlrequest_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_urlrequest_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_urlrequest_create');
|
||||||
|
|
||||||
Result := assigned(cef_urlrequest_create);
|
Result := assigned(cef_urlrequest_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_v8_capi_h : boolean;
|
function TCefApplication.Load_cef_v8_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_v8context_get_current_context := GetProcAddress(FLibHandle, 'cef_v8context_get_current_context');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8context_get_current_context{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8context_get_current_context');
|
||||||
cef_v8context_get_entered_context := GetProcAddress(FLibHandle, 'cef_v8context_get_entered_context');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8context_get_entered_context{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8context_get_entered_context');
|
||||||
cef_v8context_in_context := GetProcAddress(FLibHandle, 'cef_v8context_in_context');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8context_in_context{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8context_in_context');
|
||||||
cef_v8value_create_undefined := GetProcAddress(FLibHandle, 'cef_v8value_create_undefined');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_undefined{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_undefined');
|
||||||
cef_v8value_create_null := GetProcAddress(FLibHandle, 'cef_v8value_create_null');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_null{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_null');
|
||||||
cef_v8value_create_bool := GetProcAddress(FLibHandle, 'cef_v8value_create_bool');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_bool{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_bool');
|
||||||
cef_v8value_create_int := GetProcAddress(FLibHandle, 'cef_v8value_create_int');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_int{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_int');
|
||||||
cef_v8value_create_uint := GetProcAddress(FLibHandle, 'cef_v8value_create_uint');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_uint{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_uint');
|
||||||
cef_v8value_create_double := GetProcAddress(FLibHandle, 'cef_v8value_create_double');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_double{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_double');
|
||||||
cef_v8value_create_date := GetProcAddress(FLibHandle, 'cef_v8value_create_date');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_date{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_date');
|
||||||
cef_v8value_create_string := GetProcAddress(FLibHandle, 'cef_v8value_create_string');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_string{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_string');
|
||||||
cef_v8value_create_object := GetProcAddress(FLibHandle, 'cef_v8value_create_object');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_object{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_object');
|
||||||
cef_v8value_create_array := GetProcAddress(FLibHandle, 'cef_v8value_create_array');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_array{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_array');
|
||||||
cef_v8value_create_array_buffer := GetProcAddress(FLibHandle, 'cef_v8value_create_array_buffer');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_array_buffer{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_array_buffer');
|
||||||
cef_v8value_create_function := GetProcAddress(FLibHandle, 'cef_v8value_create_function');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8value_create_function{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8value_create_function');
|
||||||
cef_v8stack_trace_get_current := GetProcAddress(FLibHandle, 'cef_v8stack_trace_get_current');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_v8stack_trace_get_current{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_v8stack_trace_get_current');
|
||||||
cef_register_extension := GetProcAddress(FLibHandle, 'cef_register_extension');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_register_extension{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_register_extension');
|
||||||
|
|
||||||
Result := assigned(cef_v8context_get_current_context) and
|
Result := assigned(cef_v8context_get_current_context) and
|
||||||
assigned(cef_v8context_get_entered_context) and
|
assigned(cef_v8context_get_entered_context) and
|
||||||
@ -1813,10 +1822,10 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_values_capi_h : boolean;
|
function TCefApplication.Load_cef_values_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_value_create := GetProcAddress(FLibHandle, 'cef_value_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_value_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_value_create');
|
||||||
cef_binary_value_create := GetProcAddress(FLibHandle, 'cef_binary_value_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_binary_value_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_binary_value_create');
|
||||||
cef_dictionary_value_create := GetProcAddress(FLibHandle, 'cef_dictionary_value_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_dictionary_value_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_dictionary_value_create');
|
||||||
cef_list_value_create := GetProcAddress(FLibHandle, 'cef_list_value_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_list_value_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_list_value_create');
|
||||||
|
|
||||||
Result := assigned(cef_value_create) and
|
Result := assigned(cef_value_create) and
|
||||||
assigned(cef_binary_value_create) and
|
assigned(cef_binary_value_create) and
|
||||||
@ -1826,19 +1835,19 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_waitable_event_capi_h : boolean;
|
function TCefApplication.Load_cef_waitable_event_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_waitable_event_create := GetProcAddress(FLibHandle, 'cef_waitable_event_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_waitable_event_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_waitable_event_create');
|
||||||
|
|
||||||
Result := assigned(cef_waitable_event_create);
|
Result := assigned(cef_waitable_event_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_web_plugin_capi_h : boolean;
|
function TCefApplication.Load_cef_web_plugin_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_visit_web_plugin_info := GetProcAddress(FLibHandle, 'cef_visit_web_plugin_info');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_visit_web_plugin_info{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_visit_web_plugin_info');
|
||||||
cef_refresh_web_plugins := GetProcAddress(FLibHandle, 'cef_refresh_web_plugins');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_refresh_web_plugins{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_refresh_web_plugins');
|
||||||
cef_unregister_internal_web_plugin := GetProcAddress(FLibHandle, 'cef_unregister_internal_web_plugin');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_unregister_internal_web_plugin{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_unregister_internal_web_plugin');
|
||||||
cef_register_web_plugin_crash := GetProcAddress(FLibHandle, 'cef_register_web_plugin_crash');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_register_web_plugin_crash{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_register_web_plugin_crash');
|
||||||
cef_is_web_plugin_unstable := GetProcAddress(FLibHandle, 'cef_is_web_plugin_unstable');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_is_web_plugin_unstable{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_is_web_plugin_unstable');
|
||||||
cef_register_widevine_cdm := GetProcAddress(FLibHandle, 'cef_register_widevine_cdm');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_register_widevine_cdm{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_register_widevine_cdm');
|
||||||
|
|
||||||
Result := assigned(cef_visit_web_plugin_info) and
|
Result := assigned(cef_visit_web_plugin_info) and
|
||||||
assigned(cef_refresh_web_plugins) and
|
assigned(cef_refresh_web_plugins) and
|
||||||
@ -1850,23 +1859,23 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_xml_reader_capi_h : boolean;
|
function TCefApplication.Load_cef_xml_reader_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_xml_reader_create := GetProcAddress(FLibHandle, 'cef_xml_reader_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_xml_reader_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_xml_reader_create');
|
||||||
|
|
||||||
Result := assigned(cef_xml_reader_create);
|
Result := assigned(cef_xml_reader_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_zip_reader_capi_h : boolean;
|
function TCefApplication.Load_cef_zip_reader_capi_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_zip_reader_create := GetProcAddress(FLibHandle, 'cef_zip_reader_create');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_zip_reader_create{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_zip_reader_create');
|
||||||
|
|
||||||
Result := assigned(cef_zip_reader_create);
|
Result := assigned(cef_zip_reader_create);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefApplication.Load_cef_logging_internal_h : boolean;
|
function TCefApplication.Load_cef_logging_internal_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_get_min_log_level := GetProcAddress(FLibHandle, 'cef_get_min_log_level');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_min_log_level{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_min_log_level');
|
||||||
cef_get_vlog_level := GetProcAddress(FLibHandle, 'cef_get_vlog_level');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_vlog_level{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_vlog_level');
|
||||||
cef_log := GetProcAddress(FLibHandle, 'cef_log');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_log{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_log');
|
||||||
|
|
||||||
Result := assigned(cef_get_min_log_level) and
|
Result := assigned(cef_get_min_log_level) and
|
||||||
assigned(cef_get_vlog_level) and
|
assigned(cef_get_vlog_level) and
|
||||||
@ -1875,13 +1884,13 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_string_list_h : boolean;
|
function TCefApplication.Load_cef_string_list_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_string_list_alloc := GetProcAddress(FLibHandle, 'cef_string_list_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_alloc');
|
||||||
cef_string_list_size := GetProcAddress(FLibHandle, 'cef_string_list_size');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_size{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_size');
|
||||||
cef_string_list_value := GetProcAddress(FLibHandle, 'cef_string_list_value');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_value{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_value');
|
||||||
cef_string_list_append := GetProcAddress(FLibHandle, 'cef_string_list_append');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_append{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_append');
|
||||||
cef_string_list_clear := GetProcAddress(FLibHandle, 'cef_string_list_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_clear');
|
||||||
cef_string_list_free := GetProcAddress(FLibHandle, 'cef_string_list_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_free');
|
||||||
cef_string_list_copy := GetProcAddress(FLibHandle, 'cef_string_list_copy');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_list_copy{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_list_copy');
|
||||||
|
|
||||||
Result := assigned(cef_string_list_alloc) and
|
Result := assigned(cef_string_list_alloc) and
|
||||||
assigned(cef_string_list_size) and
|
assigned(cef_string_list_size) and
|
||||||
@ -1894,14 +1903,14 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_string_map_h : boolean;
|
function TCefApplication.Load_cef_string_map_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_string_map_alloc := GetProcAddress(FLibHandle, 'cef_string_map_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_alloc');
|
||||||
cef_string_map_size := GetProcAddress(FLibHandle, 'cef_string_map_size');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_size{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_size');
|
||||||
cef_string_map_find := GetProcAddress(FLibHandle, 'cef_string_map_find');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_find{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_find');
|
||||||
cef_string_map_key := GetProcAddress(FLibHandle, 'cef_string_map_key');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_key{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_key');
|
||||||
cef_string_map_value := GetProcAddress(FLibHandle, 'cef_string_map_value');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_value{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_value');
|
||||||
cef_string_map_append := GetProcAddress(FLibHandle, 'cef_string_map_append');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_append{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_append');
|
||||||
cef_string_map_clear := GetProcAddress(FLibHandle, 'cef_string_map_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_clear');
|
||||||
cef_string_map_free := GetProcAddress(FLibHandle, 'cef_string_map_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_map_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_map_free');
|
||||||
|
|
||||||
Result := assigned(cef_string_map_alloc) and
|
Result := assigned(cef_string_map_alloc) and
|
||||||
assigned(cef_string_map_size) and
|
assigned(cef_string_map_size) and
|
||||||
@ -1915,15 +1924,15 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_string_multimap_h : boolean;
|
function TCefApplication.Load_cef_string_multimap_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_string_multimap_alloc := GetProcAddress(FLibHandle, 'cef_string_multimap_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_alloc');
|
||||||
cef_string_multimap_size := GetProcAddress(FLibHandle, 'cef_string_multimap_size');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_size{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_size');
|
||||||
cef_string_multimap_find_count := GetProcAddress(FLibHandle, 'cef_string_multimap_find_count');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_find_count{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_find_count');
|
||||||
cef_string_multimap_enumerate := GetProcAddress(FLibHandle, 'cef_string_multimap_enumerate');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_enumerate{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_enumerate');
|
||||||
cef_string_multimap_key := GetProcAddress(FLibHandle, 'cef_string_multimap_key');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_key{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_key');
|
||||||
cef_string_multimap_value := GetProcAddress(FLibHandle, 'cef_string_multimap_value');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_value{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_value');
|
||||||
cef_string_multimap_append := GetProcAddress(FLibHandle, 'cef_string_multimap_append');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_append{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_append');
|
||||||
cef_string_multimap_clear := GetProcAddress(FLibHandle, 'cef_string_multimap_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_clear');
|
||||||
cef_string_multimap_free := GetProcAddress(FLibHandle, 'cef_string_multimap_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_multimap_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_multimap_free');
|
||||||
|
|
||||||
Result := assigned(cef_string_multimap_alloc) and
|
Result := assigned(cef_string_multimap_alloc) and
|
||||||
assigned(cef_string_multimap_size) and
|
assigned(cef_string_multimap_size) and
|
||||||
@ -1938,31 +1947,31 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_string_types_h : boolean;
|
function TCefApplication.Load_cef_string_types_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_string_wide_set := GetProcAddress(FLibHandle, 'cef_string_wide_set');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_wide_set{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_wide_set');
|
||||||
cef_string_utf8_set := GetProcAddress(FLibHandle, 'cef_string_utf8_set');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf8_set{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf8_set');
|
||||||
cef_string_utf16_set := GetProcAddress(FLibHandle, 'cef_string_utf16_set');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_set{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_set');
|
||||||
cef_string_wide_clear := GetProcAddress(FLibHandle, 'cef_string_wide_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_wide_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_wide_clear');
|
||||||
cef_string_utf8_clear := GetProcAddress(FLibHandle, 'cef_string_utf8_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf8_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf8_clear');
|
||||||
cef_string_utf16_clear := GetProcAddress(FLibHandle, 'cef_string_utf16_clear');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_clear{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_clear');
|
||||||
cef_string_wide_cmp := GetProcAddress(FLibHandle, 'cef_string_wide_cmp');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_wide_cmp{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_wide_cmp');
|
||||||
cef_string_utf8_cmp := GetProcAddress(FLibHandle, 'cef_string_utf8_cmp');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf8_cmp{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf8_cmp');
|
||||||
cef_string_utf16_cmp := GetProcAddress(FLibHandle, 'cef_string_utf16_cmp');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_cmp{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_cmp');
|
||||||
cef_string_wide_to_utf8 := GetProcAddress(FLibHandle, 'cef_string_wide_to_utf8');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_wide_to_utf8{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_wide_to_utf8');
|
||||||
cef_string_utf8_to_wide := GetProcAddress(FLibHandle, 'cef_string_utf8_to_wide');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf8_to_wide{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf8_to_wide');
|
||||||
cef_string_wide_to_utf16 := GetProcAddress(FLibHandle, 'cef_string_wide_to_utf16');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_wide_to_utf16{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_wide_to_utf16');
|
||||||
cef_string_utf16_to_wide := GetProcAddress(FLibHandle, 'cef_string_utf16_to_wide');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_to_wide{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_to_wide');
|
||||||
cef_string_utf8_to_utf16 := GetProcAddress(FLibHandle, 'cef_string_utf8_to_utf16');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf8_to_utf16{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf8_to_utf16');
|
||||||
cef_string_utf16_to_utf8 := GetProcAddress(FLibHandle, 'cef_string_utf16_to_utf8');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_to_utf8{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_to_utf8');
|
||||||
cef_string_ascii_to_wide := GetProcAddress(FLibHandle, 'cef_string_ascii_to_wide');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_ascii_to_wide{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_ascii_to_wide');
|
||||||
cef_string_ascii_to_utf16 := GetProcAddress(FLibHandle, 'cef_string_ascii_to_utf16');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_ascii_to_utf16{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_ascii_to_utf16');
|
||||||
cef_string_userfree_wide_alloc := GetProcAddress(FLibHandle, 'cef_string_userfree_wide_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_wide_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_wide_alloc');
|
||||||
cef_string_userfree_utf8_alloc := GetProcAddress(FLibHandle, 'cef_string_userfree_utf8_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_utf8_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_utf8_alloc');
|
||||||
cef_string_userfree_utf16_alloc := GetProcAddress(FLibHandle, 'cef_string_userfree_utf16_alloc');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_utf16_alloc{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_utf16_alloc');
|
||||||
cef_string_userfree_wide_free := GetProcAddress(FLibHandle, 'cef_string_userfree_wide_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_wide_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_wide_free');
|
||||||
cef_string_userfree_utf8_free := GetProcAddress(FLibHandle, 'cef_string_userfree_utf8_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_utf8_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_utf8_free');
|
||||||
cef_string_userfree_utf16_free := GetProcAddress(FLibHandle, 'cef_string_userfree_utf16_free');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_userfree_utf16_free{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_userfree_utf16_free');
|
||||||
cef_string_utf16_to_lower := GetProcAddress(FLibHandle, 'cef_string_utf16_to_lower');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_to_lower{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_to_lower');
|
||||||
cef_string_utf16_to_upper := GetProcAddress(FLibHandle, 'cef_string_utf16_to_upper');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_string_utf16_to_upper{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_string_utf16_to_upper');
|
||||||
|
|
||||||
Result := assigned(cef_string_wide_set) and
|
Result := assigned(cef_string_wide_set) and
|
||||||
assigned(cef_string_utf8_set) and
|
assigned(cef_string_utf8_set) and
|
||||||
@ -1993,8 +2002,8 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_thread_internal_h : boolean;
|
function TCefApplication.Load_cef_thread_internal_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_get_current_platform_thread_id := GetProcAddress(FLibHandle, 'cef_get_current_platform_thread_id');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_current_platform_thread_id{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_current_platform_thread_id');
|
||||||
cef_get_current_platform_thread_handle := GetProcAddress(FLibHandle, 'cef_get_current_platform_thread_handle');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_get_current_platform_thread_handle{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_get_current_platform_thread_handle');
|
||||||
|
|
||||||
Result := assigned(cef_get_current_platform_thread_id) and
|
Result := assigned(cef_get_current_platform_thread_id) and
|
||||||
assigned(cef_get_current_platform_thread_handle);
|
assigned(cef_get_current_platform_thread_handle);
|
||||||
@ -2002,15 +2011,15 @@ end;
|
|||||||
|
|
||||||
function TCefApplication.Load_cef_trace_event_internal_h : boolean;
|
function TCefApplication.Load_cef_trace_event_internal_h : boolean;
|
||||||
begin
|
begin
|
||||||
cef_trace_event_instant := GetProcAddress(FLibHandle, 'cef_trace_event_instant');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_instant{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_instant');
|
||||||
cef_trace_event_begin := GetProcAddress(FLibHandle, 'cef_trace_event_begin');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_begin{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_begin');
|
||||||
cef_trace_event_end := GetProcAddress(FLibHandle, 'cef_trace_event_end');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_end{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_end');
|
||||||
cef_trace_counter := GetProcAddress(FLibHandle, 'cef_trace_counter');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_counter{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_counter');
|
||||||
cef_trace_counter_id := GetProcAddress(FLibHandle, 'cef_trace_counter_id');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_counter_id{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_counter_id');
|
||||||
cef_trace_event_async_begin := GetProcAddress(FLibHandle, 'cef_trace_event_async_begin');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_async_begin{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_async_begin');
|
||||||
cef_trace_event_async_step_into := GetProcAddress(FLibHandle, 'cef_trace_event_async_step_into');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_async_step_into{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_async_step_into');
|
||||||
cef_trace_event_async_step_past := GetProcAddress(FLibHandle, 'cef_trace_event_async_step_past');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_async_step_past{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_async_step_past');
|
||||||
cef_trace_event_async_end := GetProcAddress(FLibHandle, 'cef_trace_event_async_end');
|
{$IFDEF FPC}Pointer({$ENDIF}cef_trace_event_async_end{$IFDEF FPC}){$ENDIF} := GetProcAddress(FLibHandle, 'cef_trace_event_async_end');
|
||||||
|
|
||||||
Result := assigned(cef_trace_event_instant) and
|
Result := assigned(cef_trace_event_instant) and
|
||||||
assigned(cef_trace_event_begin) and
|
assigned(cef_trace_event_begin) and
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFAuthCallback;
|
unit uCEFAuthCallback;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -66,22 +70,23 @@ uses
|
|||||||
|
|
||||||
procedure TCefAuthCallbackRef.Cancel;
|
procedure TCefAuthCallbackRef.Cancel;
|
||||||
begin
|
begin
|
||||||
PCefAuthCallback(FData).cancel(PCefAuthCallback(FData));
|
PCefAuthCallback(FData)^.cancel(PCefAuthCallback(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefAuthCallbackRef.Cont(const username, password: ustring);
|
procedure TCefAuthCallbackRef.Cont(const username, password: ustring);
|
||||||
var
|
var
|
||||||
u, p: TCefString;
|
TempUsername, TempPassword : TCefString;
|
||||||
begin
|
begin
|
||||||
u := CefString(username);
|
TempUsername := CefString(username);
|
||||||
p := CefString(password);
|
TempPassword := CefString(password);
|
||||||
PCefAuthCallback(FData).cont(PCefAuthCallback(FData), @u, @p);
|
PCefAuthCallback(FData)^.cont(PCefAuthCallback(FData), @TempUsername, @TempPassword);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
class function TCefAuthCallbackRef.UnWrap(data: Pointer): ICefAuthCallback;
|
class function TCefAuthCallbackRef.UnWrap(data: Pointer): ICefAuthCallback;
|
||||||
begin
|
begin
|
||||||
if data <> nil then
|
if (data <> nil) then
|
||||||
Result := Create(data) as ICefAuthCallback else
|
Result := Create(data) as ICefAuthCallback
|
||||||
|
else
|
||||||
Result := nil;
|
Result := nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBaseRefCounted;
|
unit uCEFBaseRefCounted;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -159,15 +163,15 @@ begin
|
|||||||
|
|
||||||
if owned then
|
if owned then
|
||||||
begin
|
begin
|
||||||
PCefBaseRefCounted(FData)^.add_ref := cef_base_add_ref_owned;
|
PCefBaseRefCounted(FData)^.add_ref := {$IFDEF FPC}@{$ENDIF}cef_base_add_ref_owned;
|
||||||
PCefBaseRefCounted(FData)^.release := cef_base_release_owned;
|
PCefBaseRefCounted(FData)^.release := {$IFDEF FPC}@{$ENDIF}cef_base_release_owned;
|
||||||
PCefBaseRefCounted(FData)^.has_one_ref := cef_base_has_one_ref_owned;
|
PCefBaseRefCounted(FData)^.has_one_ref := {$IFDEF FPC}@{$ENDIF}cef_base_has_one_ref_owned;
|
||||||
end
|
end
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
PCefBaseRefCounted(FData)^.add_ref := cef_base_add_ref;
|
PCefBaseRefCounted(FData)^.add_ref := {$IFDEF FPC}@{$ENDIF}cef_base_add_ref;
|
||||||
PCefBaseRefCounted(FData)^.release := cef_base_release_ref;
|
PCefBaseRefCounted(FData)^.release := {$IFDEF FPC}@{$ENDIF}cef_base_release_ref;
|
||||||
PCefBaseRefCounted(FData)^.has_one_ref := cef_base_has_one_ref;
|
PCefBaseRefCounted(FData)^.has_one_ref := {$IFDEF FPC}@{$ENDIF}cef_base_has_one_ref;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -264,13 +268,13 @@ end;
|
|||||||
// ************************************************
|
// ************************************************
|
||||||
|
|
||||||
|
|
||||||
function TLoggingInterfacedObject._AddRef: Integer;
|
function TLoggingInterfacedObject._AddRef: Integer; stdcall;
|
||||||
begin
|
begin
|
||||||
Result := inherited _AddRef;
|
Result := inherited _AddRef;
|
||||||
CefDebugLog(ClassName + '._AddRef -> FRefCount = ' + IntToStr(Result));
|
CefDebugLog(ClassName + '._AddRef -> FRefCount = ' + IntToStr(Result));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TLoggingInterfacedObject._Release: Integer;
|
function TLoggingInterfacedObject._Release: Integer; stdcall;
|
||||||
begin
|
begin
|
||||||
CefDebugLog(ClassName + '._Release -> FRefCount = ' + IntToStr(pred(RefCount)));
|
CefDebugLog(ClassName + '._Release -> FRefCount = ' + IntToStr(pred(RefCount)));
|
||||||
Result := inherited _Release;
|
Result := inherited _Release;
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBaseScopedWrapper;
|
unit uCEFBaseScopedWrapper;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBeforeDownloadCallback;
|
unit uCEFBeforeDownloadCallback;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -63,20 +67,19 @@ implementation
|
|||||||
uses
|
uses
|
||||||
uCEFMiscFunctions, uCEFLibFunctions;
|
uCEFMiscFunctions, uCEFLibFunctions;
|
||||||
|
|
||||||
procedure TCefBeforeDownloadCallbackRef.Cont(const downloadPath: ustring;
|
procedure TCefBeforeDownloadCallbackRef.Cont(const downloadPath: ustring; showDialog: Boolean);
|
||||||
showDialog: Boolean);
|
|
||||||
var
|
var
|
||||||
dp: TCefString;
|
TempPath : TCefString;
|
||||||
begin
|
begin
|
||||||
dp := CefString(downloadPath);
|
TempPath := CefString(downloadPath);
|
||||||
PCefBeforeDownloadCallback(FData).cont(PCefBeforeDownloadCallback(FData), @dp, Ord(showDialog));
|
PCefBeforeDownloadCallback(FData)^.cont(PCefBeforeDownloadCallback(FData), @TempPath, Ord(showDialog));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
class function TCefBeforeDownloadCallbackRef.UnWrap(
|
class function TCefBeforeDownloadCallbackRef.UnWrap(data: Pointer): ICefBeforeDownloadCallback;
|
||||||
data: Pointer): ICefBeforeDownloadCallback;
|
|
||||||
begin
|
begin
|
||||||
if data <> nil then
|
if (data <> nil) then
|
||||||
Result := Create(data) as ICefBeforeDownloadCallback else
|
Result := Create(data) as ICefBeforeDownloadCallback
|
||||||
|
else
|
||||||
Result := nil;
|
Result := nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBinaryValue;
|
unit uCEFBinaryValue;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -92,38 +96,37 @@ uses
|
|||||||
|
|
||||||
function TCefBinaryValueRef.Copy: ICefBinaryValue;
|
function TCefBinaryValueRef.Copy: ICefBinaryValue;
|
||||||
begin
|
begin
|
||||||
Result := UnWrap(PCefBinaryValue(FData).copy(PCefBinaryValue(FData)));
|
Result := UnWrap(PCefBinaryValue(FData)^.copy(PCefBinaryValue(FData)));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.GetData(buffer: Pointer; bufferSize,
|
function TCefBinaryValueRef.GetData(buffer: Pointer; bufferSize, dataOffset: NativeUInt): NativeUInt;
|
||||||
dataOffset: NativeUInt): NativeUInt;
|
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).get_data(PCefBinaryValue(FData), buffer, bufferSize, dataOffset);
|
Result := PCefBinaryValue(FData)^.get_data(PCefBinaryValue(FData), buffer, bufferSize, dataOffset);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.GetSize: NativeUInt;
|
function TCefBinaryValueRef.GetSize: NativeUInt;
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).get_size(PCefBinaryValue(FData));
|
Result := PCefBinaryValue(FData)^.get_size(PCefBinaryValue(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.IsEqual(const that: ICefBinaryValue): Boolean;
|
function TCefBinaryValueRef.IsEqual(const that: ICefBinaryValue): Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).is_equal(PCefBinaryValue(FData), CefGetData(that)) <> 0;
|
Result := PCefBinaryValue(FData)^.is_equal(PCefBinaryValue(FData), CefGetData(that)) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.IsOwned: Boolean;
|
function TCefBinaryValueRef.IsOwned: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).is_owned(PCefBinaryValue(FData)) <> 0;
|
Result := PCefBinaryValue(FData)^.is_owned(PCefBinaryValue(FData)) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.IsSame(const that: ICefBinaryValue): Boolean;
|
function TCefBinaryValueRef.IsSame(const that: ICefBinaryValue): Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).is_same(PCefBinaryValue(FData), CefGetData(that)) <> 0;
|
Result := PCefBinaryValue(FData)^.is_same(PCefBinaryValue(FData), CefGetData(that)) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBinaryValueRef.IsValid: Boolean;
|
function TCefBinaryValueRef.IsValid: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBinaryValue(FData).is_valid(PCefBinaryValue(FData)) <> 0;
|
Result := PCefBinaryValue(FData)^.is_valid(PCefBinaryValue(FData)) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
class function TCefBinaryValueRef.New(const data: Pointer; dataSize: NativeUInt): ICefBinaryValue;
|
class function TCefBinaryValueRef.New(const data: Pointer; dataSize: NativeUInt): ICefBinaryValue;
|
||||||
@ -133,8 +136,9 @@ end;
|
|||||||
|
|
||||||
class function TCefBinaryValueRef.UnWrap(data: Pointer): ICefBinaryValue;
|
class function TCefBinaryValueRef.UnWrap(data: Pointer): ICefBinaryValue;
|
||||||
begin
|
begin
|
||||||
if data <> nil then
|
if (data <> nil) then
|
||||||
Result := Create(data) as ICefBinaryValue else
|
Result := Create(data) as ICefBinaryValue
|
||||||
|
else
|
||||||
Result := nil;
|
Result := nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -226,13 +230,13 @@ begin
|
|||||||
|
|
||||||
with PCefBinaryValue(FData)^ do
|
with PCefBinaryValue(FData)^ do
|
||||||
begin
|
begin
|
||||||
is_valid := cef_binary_value_is_valid;
|
is_valid := {$IFDEF FPC}@{$ENDIF}cef_binary_value_is_valid;
|
||||||
is_owned := cef_binary_value_is_owned;
|
is_owned := {$IFDEF FPC}@{$ENDIF}cef_binary_value_is_owned;
|
||||||
is_same := cef_binary_value_is_same;
|
is_same := {$IFDEF FPC}@{$ENDIF}cef_binary_value_is_same;
|
||||||
is_equal := cef_binary_value_is_equal;
|
is_equal := {$IFDEF FPC}@{$ENDIF}cef_binary_value_is_equal;
|
||||||
copy := cef_binary_value_copy;
|
copy := {$IFDEF FPC}@{$ENDIF}cef_binary_value_copy;
|
||||||
get_size := cef_binary_value_get_size;
|
get_size := {$IFDEF FPC}@{$ENDIF}cef_binary_value_get_size;
|
||||||
get_data := cef_binary_value_get_data;
|
get_data := {$IFDEF FPC}@{$ENDIF}cef_binary_value_get_data;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBrowser;
|
unit uCEFBrowser;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -123,7 +127,7 @@ type
|
|||||||
procedure SendMouseClickEvent(const event: PCefMouseEvent; kind: TCefMouseButtonType; mouseUp: Boolean; clickCount: Integer);
|
procedure SendMouseClickEvent(const event: PCefMouseEvent; kind: TCefMouseButtonType; mouseUp: Boolean; clickCount: Integer);
|
||||||
procedure SendMouseMoveEvent(const event: PCefMouseEvent; mouseLeave: Boolean);
|
procedure SendMouseMoveEvent(const event: PCefMouseEvent; mouseLeave: Boolean);
|
||||||
procedure SendMouseWheelEvent(const event: PCefMouseEvent; deltaX, deltaY: Integer);
|
procedure SendMouseWheelEvent(const event: PCefMouseEvent; deltaX, deltaY: Integer);
|
||||||
procedure SendFocusEvent(setFocus: Boolean);
|
procedure SendFocusEvent(aSetFocus: Boolean);
|
||||||
procedure SendCaptureLostEvent;
|
procedure SendCaptureLostEvent;
|
||||||
procedure NotifyMoveOrResizeStarted;
|
procedure NotifyMoveOrResizeStarted;
|
||||||
function GetWindowlessFrameRate : Integer;
|
function GetWindowlessFrameRate : Integer;
|
||||||
@ -182,10 +186,10 @@ end;
|
|||||||
|
|
||||||
function TCefBrowserRef.GetFrame(const name: ustring): ICefFrame;
|
function TCefBrowserRef.GetFrame(const name: ustring): ICefFrame;
|
||||||
var
|
var
|
||||||
n: TCefString;
|
TempName : TCefString;
|
||||||
begin
|
begin
|
||||||
n := CefString(name);
|
TempName := CefString(name);
|
||||||
Result := TCefFrameRef.UnWrap(PCefBrowser(FData)^.get_frame(PCefBrowser(FData), @n));
|
Result := TCefFrameRef.UnWrap(PCefBrowser(FData)^.get_frame(PCefBrowser(FData), @TempName));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserRef.GetFrameCount: NativeUInt;
|
function TCefBrowserRef.GetFrameCount: NativeUInt;
|
||||||
@ -307,7 +311,7 @@ end;
|
|||||||
|
|
||||||
procedure TCefBrowserHostRef.CloseDevTools;
|
procedure TCefBrowserHostRef.CloseDevTools;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).close_dev_tools(FData);
|
PCefBrowserHost(FData)^.close_dev_tools(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DownloadImage(const imageUrl : ustring;
|
procedure TCefBrowserHostRef.DownloadImage(const imageUrl : ustring;
|
||||||
@ -319,7 +323,7 @@ var
|
|||||||
url: TCefString;
|
url: TCefString;
|
||||||
begin
|
begin
|
||||||
url := CefString(imageUrl);
|
url := CefString(imageUrl);
|
||||||
PCefBrowserHost(FData).download_image(FData, @url, Ord(isFavicon), maxImageSize, Ord(bypassCache), CefGetData(callback));
|
PCefBrowserHost(FData)^.download_image(FData, @url, Ord(isFavicon), maxImageSize, Ord(bypassCache), CefGetData(callback));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DownloadImageProc(const imageUrl : ustring;
|
procedure TCefBrowserHostRef.DownloadImageProc(const imageUrl : ustring;
|
||||||
@ -333,77 +337,75 @@ end;
|
|||||||
|
|
||||||
procedure TCefBrowserHostRef.DragSourceEndedAt(x, y: Integer; op: TCefDragOperation);
|
procedure TCefBrowserHostRef.DragSourceEndedAt(x, y: Integer; op: TCefDragOperation);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_source_ended_at(FData, x, y, op);
|
PCefBrowserHost(FData)^.drag_source_ended_at(FData, x, y, op);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DragSourceSystemDragEnded;
|
procedure TCefBrowserHostRef.DragSourceSystemDragEnded;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_source_system_drag_ended(FData);
|
PCefBrowserHost(FData)^.drag_source_system_drag_ended(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetVisibleNavigationEntry : ICefNavigationEntry;
|
function TCefBrowserHostRef.GetVisibleNavigationEntry : ICefNavigationEntry;
|
||||||
begin
|
begin
|
||||||
Result := TCefNavigationEntryRef.UnWrap(PCefBrowserHost(FData).get_visible_navigation_entry(PCefBrowserHost(FData)));
|
Result := TCefNavigationEntryRef.UnWrap(PCefBrowserHost(FData)^.get_visible_navigation_entry(PCefBrowserHost(FData)));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetAccessibilityState(accessibilityState: TCefState);
|
procedure TCefBrowserHostRef.SetAccessibilityState(accessibilityState: TCefState);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_accessibility_state(FData, accessibilityState);
|
PCefBrowserHost(FData)^.set_accessibility_state(FData, accessibilityState);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetAutoResizeEnabled(enabled: boolean; const min_size, max_size: PCefSize);
|
procedure TCefBrowserHostRef.SetAutoResizeEnabled(enabled: boolean; const min_size, max_size: PCefSize);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_auto_resize_enabled(FData, Ord(enabled), min_size, max_size);
|
PCefBrowserHost(FData)^.set_auto_resize_enabled(FData, Ord(enabled), min_size, max_size);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetExtension : ICefExtension;
|
function TCefBrowserHostRef.GetExtension : ICefExtension;
|
||||||
begin
|
begin
|
||||||
Result := TCefExtensionRef.UnWrap(PCefBrowserHost(FData).get_extension(FData));
|
Result := TCefExtensionRef.UnWrap(PCefBrowserHost(FData)^.get_extension(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.IsBackgroundHost : boolean;
|
function TCefBrowserHostRef.IsBackgroundHost : boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).is_background_host(FData) <> 0;
|
Result := PCefBrowserHost(FData)^.is_background_host(FData) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DragTargetDragEnter(const dragData: ICefDragData;
|
procedure TCefBrowserHostRef.DragTargetDragEnter(const dragData: ICefDragData; const event: PCefMouseEvent; allowedOps: TCefDragOperations);
|
||||||
const event: PCefMouseEvent; allowedOps: TCefDragOperations);
|
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_target_drag_enter(FData, CefGetData(dragData), event, allowedOps);
|
PCefBrowserHost(FData)^.drag_target_drag_enter(FData, CefGetData(dragData), event, allowedOps);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DragTargetDragLeave;
|
procedure TCefBrowserHostRef.DragTargetDragLeave;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_target_drag_leave(FData);
|
PCefBrowserHost(FData)^.drag_target_drag_leave(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DragTargetDragOver(const event: PCefMouseEvent;
|
procedure TCefBrowserHostRef.DragTargetDragOver(const event: PCefMouseEvent; allowedOps: TCefDragOperations);
|
||||||
allowedOps: TCefDragOperations);
|
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_target_drag_over(FData, event, allowedOps);
|
PCefBrowserHost(FData)^.drag_target_drag_over(FData, event, allowedOps);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.DragTargetDrop(event: PCefMouseEvent);
|
procedure TCefBrowserHostRef.DragTargetDrop(event: PCefMouseEvent);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).drag_target_drop(FData, event);
|
PCefBrowserHost(FData)^.drag_target_drop(FData, event);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.Find(identifier: Integer; const searchText: ustring; forward, matchCase, findNext: Boolean);
|
procedure TCefBrowserHostRef.Find(identifier: Integer; const searchText: ustring; forward, matchCase, findNext: Boolean);
|
||||||
var
|
var
|
||||||
s: TCefString;
|
TempText : TCefString;
|
||||||
begin
|
begin
|
||||||
s := CefString(searchText);
|
TempText := CefString(searchText);
|
||||||
PCefBrowserHost(FData).find(FData, identifier, @s, Ord(forward), Ord(matchCase), Ord(findNext));
|
PCefBrowserHost(FData)^.find(FData, identifier, @TempText, Ord(forward), Ord(matchCase), Ord(findNext));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetBrowser: ICefBrowser;
|
function TCefBrowserHostRef.GetBrowser: ICefBrowser;
|
||||||
begin
|
begin
|
||||||
Result := TCefBrowserRef.UnWrap(PCefBrowserHost(FData).get_browser(PCefBrowserHost(FData)));
|
Result := TCefBrowserRef.UnWrap(PCefBrowserHost(FData)^.get_browser(PCefBrowserHost(FData)));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.Print;
|
procedure TCefBrowserHostRef.Print;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).print(FData);
|
PCefBrowserHost(FData)^.print(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.PrintToPdf(const path : ustring;
|
procedure TCefBrowserHostRef.PrintToPdf(const path : ustring;
|
||||||
@ -413,7 +415,7 @@ var
|
|||||||
str: TCefString;
|
str: TCefString;
|
||||||
begin
|
begin
|
||||||
str := CefString(path);
|
str := CefString(path);
|
||||||
PCefBrowserHost(FData).print_to_pdf(FData, @str, settings, CefGetData(callback));
|
PCefBrowserHost(FData)^.print_to_pdf(FData, @str, settings, CefGetData(callback));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.PrintToPdfProc(const path : ustring;
|
procedure TCefBrowserHostRef.PrintToPdfProc(const path : ustring;
|
||||||
@ -428,7 +430,7 @@ var
|
|||||||
str: TCefString;
|
str: TCefString;
|
||||||
begin
|
begin
|
||||||
str := CefString(word);
|
str := CefString(word);
|
||||||
PCefBrowserHost(FData).replace_misspelling(FData, @str);
|
PCefBrowserHost(FData)^.replace_misspelling(FData, @str);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.RunFileDialog( mode : TCefFileDialogMode;
|
procedure TCefBrowserHostRef.RunFileDialog( mode : TCefFileDialogMode;
|
||||||
@ -448,13 +450,13 @@ begin
|
|||||||
TempAcceptFilters := TCefStringListOwn.Create;
|
TempAcceptFilters := TCefStringListOwn.Create;
|
||||||
TempAcceptFilters.AddStrings(acceptFilters);
|
TempAcceptFilters.AddStrings(acceptFilters);
|
||||||
|
|
||||||
PCefBrowserHost(FData).run_file_dialog(PCefBrowserHost(FData),
|
PCefBrowserHost(FData)^.run_file_dialog(PCefBrowserHost(FData),
|
||||||
mode,
|
mode,
|
||||||
@TempTitle,
|
@TempTitle,
|
||||||
@TempPath,
|
@TempPath,
|
||||||
TempAcceptFilters.Handle,
|
TempAcceptFilters.Handle,
|
||||||
selectedAcceptFilter,
|
selectedAcceptFilter,
|
||||||
CefGetData(callback));
|
CefGetData(callback));
|
||||||
finally
|
finally
|
||||||
TempAcceptFilters := nil;
|
TempAcceptFilters := nil;
|
||||||
end;
|
end;
|
||||||
@ -475,27 +477,27 @@ var
|
|||||||
str: TCefString;
|
str: TCefString;
|
||||||
begin
|
begin
|
||||||
str := CefString(word);
|
str := CefString(word);
|
||||||
PCefBrowserHost(FData).add_word_to_dictionary(FData, @str);
|
PCefBrowserHost(FData)^.add_word_to_dictionary(FData, @str);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.CloseBrowser(forceClose: Boolean);
|
procedure TCefBrowserHostRef.CloseBrowser(forceClose: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).close_browser(PCefBrowserHost(FData), Ord(forceClose));
|
PCefBrowserHost(FData)^.close_browser(PCefBrowserHost(FData), Ord(forceClose));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendCaptureLostEvent;
|
procedure TCefBrowserHostRef.SendCaptureLostEvent;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_capture_lost_event(FData);
|
PCefBrowserHost(FData)^.send_capture_lost_event(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendFocusEvent(setFocus: Boolean);
|
procedure TCefBrowserHostRef.SendFocusEvent(aSetFocus: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_focus_event(FData, Ord(setFocus));
|
PCefBrowserHost(FData)^.send_focus_event(FData, Ord(aSetFocus));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendKeyEvent(const event: PCefKeyEvent);
|
procedure TCefBrowserHostRef.SendKeyEvent(const event: PCefKeyEvent);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_key_event(FData, event);
|
PCefBrowserHost(FData)^.send_key_event(FData, event);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendMouseClickEvent(const event : PCefMouseEvent;
|
procedure TCefBrowserHostRef.SendMouseClickEvent(const event : PCefMouseEvent;
|
||||||
@ -503,57 +505,57 @@ procedure TCefBrowserHostRef.SendMouseClickEvent(const event : PCefMouseEve
|
|||||||
mouseUp : Boolean;
|
mouseUp : Boolean;
|
||||||
clickCount : Integer);
|
clickCount : Integer);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_mouse_click_event(FData, event, kind, Ord(mouseUp), clickCount);
|
PCefBrowserHost(FData)^.send_mouse_click_event(FData, event, kind, Ord(mouseUp), clickCount);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendMouseMoveEvent(const event: PCefMouseEvent; mouseLeave: Boolean);
|
procedure TCefBrowserHostRef.SendMouseMoveEvent(const event: PCefMouseEvent; mouseLeave: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_mouse_move_event(FData, event, Ord(mouseLeave));
|
PCefBrowserHost(FData)^.send_mouse_move_event(FData, event, Ord(mouseLeave));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SendMouseWheelEvent(const event: PCefMouseEvent; deltaX, deltaY: Integer);
|
procedure TCefBrowserHostRef.SendMouseWheelEvent(const event: PCefMouseEvent; deltaX, deltaY: Integer);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).send_mouse_wheel_event(FData, event, deltaX, deltaY);
|
PCefBrowserHost(FData)^.send_mouse_wheel_event(FData, event, deltaX, deltaY);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetFocus(focus: Boolean);
|
procedure TCefBrowserHostRef.SetFocus(focus: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_focus(PCefBrowserHost(FData), Ord(focus));
|
PCefBrowserHost(FData)^.set_focus(PCefBrowserHost(FData), Ord(focus));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetMouseCursorChangeDisabled(disabled: Boolean);
|
procedure TCefBrowserHostRef.SetMouseCursorChangeDisabled(disabled: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_mouse_cursor_change_disabled(PCefBrowserHost(FData), Ord(disabled));
|
PCefBrowserHost(FData)^.set_mouse_cursor_change_disabled(PCefBrowserHost(FData), Ord(disabled));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetWindowlessFrameRate(frameRate: Integer);
|
procedure TCefBrowserHostRef.SetWindowlessFrameRate(frameRate: Integer);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_windowless_frame_rate(PCefBrowserHost(FData), frameRate);
|
PCefBrowserHost(FData)^.set_windowless_frame_rate(PCefBrowserHost(FData), frameRate);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetWindowHandle: TCefWindowHandle;
|
function TCefBrowserHostRef.GetWindowHandle: TCefWindowHandle;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).get_window_handle(PCefBrowserHost(FData))
|
Result := PCefBrowserHost(FData)^.get_window_handle(PCefBrowserHost(FData))
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetWindowlessFrameRate: Integer;
|
function TCefBrowserHostRef.GetWindowlessFrameRate: Integer;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).get_windowless_frame_rate(PCefBrowserHost(FData));
|
Result := PCefBrowserHost(FData)^.get_windowless_frame_rate(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetOpenerWindowHandle: TCefWindowHandle;
|
function TCefBrowserHostRef.GetOpenerWindowHandle: TCefWindowHandle;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).get_opener_window_handle(PCefBrowserHost(FData));
|
Result := PCefBrowserHost(FData)^.get_opener_window_handle(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.GetRequestContext: ICefRequestContext;
|
function TCefBrowserHostRef.GetRequestContext: ICefRequestContext;
|
||||||
begin
|
begin
|
||||||
Result := TCefRequestContextRef.UnWrap(PCefBrowserHost(FData).get_request_context(FData));
|
Result := TCefRequestContextRef.UnWrap(PCefBrowserHost(FData)^.get_request_context(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.GetNavigationEntries(const visitor: ICefNavigationEntryVisitor; currentOnly: Boolean);
|
procedure TCefBrowserHostRef.GetNavigationEntries(const visitor: ICefNavigationEntryVisitor; currentOnly: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).get_navigation_entries(FData, CefGetData(visitor), Ord(currentOnly));
|
PCefBrowserHost(FData)^.get_navigation_entries(FData, CefGetData(visitor), Ord(currentOnly));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.GetNavigationEntriesProc(const proc: TCefNavigationEntryVisitorProc; currentOnly: Boolean);
|
procedure TCefBrowserHostRef.GetNavigationEntriesProc(const proc: TCefNavigationEntryVisitorProc; currentOnly: Boolean);
|
||||||
@ -563,7 +565,7 @@ end;
|
|||||||
|
|
||||||
function TCefBrowserHostRef.GetZoomLevel: Double;
|
function TCefBrowserHostRef.GetZoomLevel: Double;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).get_zoom_level(PCefBrowserHost(FData));
|
Result := PCefBrowserHost(FData)^.get_zoom_level(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.IMESetComposition(const text : ustring;
|
procedure TCefBrowserHostRef.IMESetComposition(const text : ustring;
|
||||||
@ -575,7 +577,7 @@ var
|
|||||||
TempString : TCefString;
|
TempString : TCefString;
|
||||||
begin
|
begin
|
||||||
TempString := CefString(text);
|
TempString := CefString(text);
|
||||||
PCefBrowserHost(FData).ime_set_composition(PCefBrowserHost(FData), @TempString, underlinesCount, underlines, replacement_range, selection_range);
|
PCefBrowserHost(FData)^.ime_set_composition(PCefBrowserHost(FData), @TempString, underlinesCount, underlines, replacement_range, selection_range);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.IMECommitText(const text: ustring; const replacement_range : PCefRange; relative_cursor_pos : integer);
|
procedure TCefBrowserHostRef.IMECommitText(const text: ustring; const replacement_range : PCefRange; relative_cursor_pos : integer);
|
||||||
@ -583,57 +585,57 @@ var
|
|||||||
TempString : TCefString;
|
TempString : TCefString;
|
||||||
begin
|
begin
|
||||||
TempString := CefString(text);
|
TempString := CefString(text);
|
||||||
PCefBrowserHost(FData).ime_commit_text(PCefBrowserHost(FData), @TempString, replacement_range, relative_cursor_pos);
|
PCefBrowserHost(FData)^.ime_commit_text(PCefBrowserHost(FData), @TempString, replacement_range, relative_cursor_pos);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.IMEFinishComposingText(keep_selection : boolean);
|
procedure TCefBrowserHostRef.IMEFinishComposingText(keep_selection : boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).ime_finish_composing_text(PCefBrowserHost(FData), ord(keep_selection));
|
PCefBrowserHost(FData)^.ime_finish_composing_text(PCefBrowserHost(FData), ord(keep_selection));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.IMECancelComposition;
|
procedure TCefBrowserHostRef.IMECancelComposition;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).ime_cancel_composition(PCefBrowserHost(FData));
|
PCefBrowserHost(FData)^.ime_cancel_composition(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.HasDevTools: Boolean;
|
function TCefBrowserHostRef.HasDevTools: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).has_dev_tools(FData) <> 0;
|
Result := PCefBrowserHost(FData)^.has_dev_tools(FData) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.HasView: Boolean;
|
function TCefBrowserHostRef.HasView: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).has_view(FData) <> 0;
|
Result := PCefBrowserHost(FData)^.has_view(FData) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.Invalidate(kind: TCefPaintElementType);
|
procedure TCefBrowserHostRef.Invalidate(kind: TCefPaintElementType);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).invalidate(FData, kind);
|
PCefBrowserHost(FData)^.invalidate(FData, kind);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.IsMouseCursorChangeDisabled: Boolean;
|
function TCefBrowserHostRef.IsMouseCursorChangeDisabled: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).is_mouse_cursor_change_disabled(FData) <> 0
|
Result := PCefBrowserHost(FData)^.is_mouse_cursor_change_disabled(FData) <> 0
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.IsWindowRenderingDisabled: Boolean;
|
function TCefBrowserHostRef.IsWindowRenderingDisabled: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).is_window_rendering_disabled(FData) <> 0
|
Result := PCefBrowserHost(FData)^.is_window_rendering_disabled(FData) <> 0
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.NotifyMoveOrResizeStarted;
|
procedure TCefBrowserHostRef.NotifyMoveOrResizeStarted;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).notify_move_or_resize_started(PCefBrowserHost(FData));
|
PCefBrowserHost(FData)^.notify_move_or_resize_started(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.NotifyScreenInfoChanged;
|
procedure TCefBrowserHostRef.NotifyScreenInfoChanged;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).notify_screen_info_changed(PCefBrowserHost(FData));
|
PCefBrowserHost(FData)^.notify_screen_info_changed(PCefBrowserHost(FData));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.SetZoomLevel(const zoomLevel: Double);
|
procedure TCefBrowserHostRef.SetZoomLevel(const zoomLevel: Double);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).set_zoom_level(PCefBrowserHost(FData), zoomLevel);
|
PCefBrowserHost(FData)^.set_zoom_level(PCefBrowserHost(FData), zoomLevel);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.ShowDevTools(const windowInfo : PCefWindowInfo;
|
procedure TCefBrowserHostRef.ShowDevTools(const windowInfo : PCefWindowInfo;
|
||||||
@ -641,42 +643,43 @@ procedure TCefBrowserHostRef.ShowDevTools(const windowInfo : PCefWindowInf
|
|||||||
const settings : PCefBrowserSettings;
|
const settings : PCefBrowserSettings;
|
||||||
inspectElementAt : PCefPoint);
|
inspectElementAt : PCefPoint);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).show_dev_tools(FData, windowInfo, CefGetData(client), settings, inspectElementAt);
|
PCefBrowserHost(FData)^.show_dev_tools(FData, windowInfo, CefGetData(client), settings, inspectElementAt);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.StartDownload(const url: ustring);
|
procedure TCefBrowserHostRef.StartDownload(const url: ustring);
|
||||||
var
|
var
|
||||||
u: TCefString;
|
TempURL : TCefString;
|
||||||
begin
|
begin
|
||||||
u := CefString(url);
|
TempURL := CefString(url);
|
||||||
PCefBrowserHost(FData).start_download(PCefBrowserHost(FData), @u);
|
PCefBrowserHost(FData)^.start_download(PCefBrowserHost(FData), @TempURL);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.StopFinding(clearSelection: Boolean);
|
procedure TCefBrowserHostRef.StopFinding(clearSelection: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).stop_finding(FData, Ord(clearSelection));
|
PCefBrowserHost(FData)^.stop_finding(FData, Ord(clearSelection));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCefBrowserHostRef.TryCloseBrowser: Boolean;
|
function TCefBrowserHostRef.TryCloseBrowser: Boolean;
|
||||||
begin
|
begin
|
||||||
Result := PCefBrowserHost(FData).try_close_browser(FData) <> 0;
|
Result := PCefBrowserHost(FData)^.try_close_browser(FData) <> 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
class function TCefBrowserHostRef.UnWrap(data: Pointer): ICefBrowserHost;
|
class function TCefBrowserHostRef.UnWrap(data: Pointer): ICefBrowserHost;
|
||||||
begin
|
begin
|
||||||
if data <> nil then
|
if (data <> nil) then
|
||||||
Result := Create(data) as ICefBrowserHost else
|
Result := Create(data) as ICefBrowserHost
|
||||||
|
else
|
||||||
Result := nil;
|
Result := nil;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.WasHidden(hidden: Boolean);
|
procedure TCefBrowserHostRef.WasHidden(hidden: Boolean);
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).was_hidden(FData, Ord(hidden));
|
PCefBrowserHost(FData)^.was_hidden(FData, Ord(hidden));
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCefBrowserHostRef.WasResized;
|
procedure TCefBrowserHostRef.WasResized;
|
||||||
begin
|
begin
|
||||||
PCefBrowserHost(FData).was_resized(FData);
|
PCefBrowserHost(FData)^.was_resized(FData);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFBrowserProcessHandler;
|
unit uCEFBrowserProcessHandler;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -152,11 +156,11 @@ begin
|
|||||||
|
|
||||||
with PCefBrowserProcessHandler(FData)^ do
|
with PCefBrowserProcessHandler(FData)^ do
|
||||||
begin
|
begin
|
||||||
on_context_initialized := cef_browser_process_handler_on_context_initialized;
|
on_context_initialized := {$IFDEF FPC}@{$ENDIF}cef_browser_process_handler_on_context_initialized;
|
||||||
on_before_child_process_launch := cef_browser_process_handler_on_before_child_process_launch;
|
on_before_child_process_launch := {$IFDEF FPC}@{$ENDIF}cef_browser_process_handler_on_before_child_process_launch;
|
||||||
on_render_process_thread_created := cef_browser_process_handler_on_render_process_thread_created;
|
on_render_process_thread_created := {$IFDEF FPC}@{$ENDIF}cef_browser_process_handler_on_render_process_thread_created;
|
||||||
get_print_handler := cef_browser_process_handler_get_print_handler;
|
get_print_handler := {$IFDEF FPC}@{$ENDIF}cef_browser_process_handler_get_print_handler;
|
||||||
on_schedule_message_pump_work := cef_browser_process_handler_on_schedule_message_pump_work;
|
on_schedule_message_pump_work := {$IFDEF FPC}@{$ENDIF}cef_browser_process_handler_on_schedule_message_pump_work;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFCallback;
|
unit uCEFCallback;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFChromium;
|
unit uCEFChromium;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -50,11 +54,17 @@ uses
|
|||||||
{$IFDEF DELPHI16_UP}
|
{$IFDEF DELPHI16_UP}
|
||||||
{$IFDEF MSWINDOWS}WinApi.Windows, WinApi.Messages, Vcl.Controls, Vcl.Graphics, Vcl.Forms, WinApi.ActiveX,{$ENDIF} System.Classes,
|
{$IFDEF MSWINDOWS}WinApi.Windows, WinApi.Messages, Vcl.Controls, Vcl.Graphics, Vcl.Forms, WinApi.ActiveX,{$ENDIF} System.Classes,
|
||||||
{$ELSE}
|
{$ELSE}
|
||||||
Windows, Messages, Classes, Controls, Graphics, Forms, ActiveX,
|
Windows, Classes, Forms, Controls, Graphics, ActiveX,
|
||||||
|
{$IFDEF FPC}
|
||||||
|
LCLProc, LCLType, LCLIntf, LResources, LMessages, InterfaceBase,
|
||||||
|
{$ELSE}
|
||||||
|
Messages,
|
||||||
|
{$ENDIF}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
uCEFTypes, uCEFInterfaces, uCEFLibFunctions, uCEFMiscFunctions, uCEFClient,
|
uCEFTypes, uCEFInterfaces, uCEFLibFunctions, uCEFMiscFunctions, uCEFClient,
|
||||||
uCEFConstants, uCEFTask, uCEFDomVisitor, uCEFChromiumEvents,
|
uCEFConstants, uCEFTask, uCEFDomVisitor, uCEFChromiumEvents,
|
||||||
uCEFChromiumOptions, uCEFChromiumFontOptions, uCEFPDFPrintOptions, uCEFDragAndDropMgr;
|
{$IFNDEF FPC}uCEFDragAndDropMgr,{$ENDIF}
|
||||||
|
uCEFChromiumOptions, uCEFChromiumFontOptions, uCEFPDFPrintOptions;
|
||||||
|
|
||||||
type
|
type
|
||||||
TChromium = class(TComponent, IChromiumEvents)
|
TChromium = class(TComponent, IChromiumEvents)
|
||||||
@ -70,15 +80,15 @@ type
|
|||||||
FDefaultEncoding : ustring;
|
FDefaultEncoding : ustring;
|
||||||
FProxyType : integer;
|
FProxyType : integer;
|
||||||
FProxyScheme : TCefProxyScheme;
|
FProxyScheme : TCefProxyScheme;
|
||||||
FProxyServer : string;
|
FProxyServer : ustring;
|
||||||
FProxyPort : integer;
|
FProxyPort : integer;
|
||||||
FProxyUsername : string;
|
FProxyUsername : ustring;
|
||||||
FProxyPassword : string;
|
FProxyPassword : ustring;
|
||||||
FProxyScriptURL : string;
|
FProxyScriptURL : ustring;
|
||||||
FProxyByPassList : string;
|
FProxyByPassList : ustring;
|
||||||
FUpdatePreferences : boolean;
|
FUpdatePreferences : boolean;
|
||||||
FCustomHeaderName : string;
|
FCustomHeaderName : ustring;
|
||||||
FCustomHeaderValue : string;
|
FCustomHeaderValue : ustring;
|
||||||
FAddCustomHeader : boolean;
|
FAddCustomHeader : boolean;
|
||||||
FDoNotTrack : boolean;
|
FDoNotTrack : boolean;
|
||||||
FSendReferrer : boolean;
|
FSendReferrer : boolean;
|
||||||
@ -89,7 +99,6 @@ type
|
|||||||
FCookiePrefs : integer;
|
FCookiePrefs : integer;
|
||||||
FImagesPrefs : integer;
|
FImagesPrefs : integer;
|
||||||
FZoomStep : byte;
|
FZoomStep : byte;
|
||||||
FWindowName : string;
|
|
||||||
FPrefsFileName : string;
|
FPrefsFileName : string;
|
||||||
FIsOSR : boolean;
|
FIsOSR : boolean;
|
||||||
FInitialized : boolean;
|
FInitialized : boolean;
|
||||||
@ -99,22 +108,25 @@ type
|
|||||||
FDevWindowInfo : TCefWindowInfo;
|
FDevWindowInfo : TCefWindowInfo;
|
||||||
FDevBrowserSettings : TCefBrowserSettings;
|
FDevBrowserSettings : TCefBrowserSettings;
|
||||||
FDragOperations : TCefDragOperations;
|
FDragOperations : TCefDragOperations;
|
||||||
|
{$IFNDEF FPC}
|
||||||
FDragDropManager : TCEFDragAndDropMgr;
|
FDragDropManager : TCEFDragAndDropMgr;
|
||||||
|
{$ENDIF}
|
||||||
FDropTargetCtrl : TWinControl;
|
FDropTargetCtrl : TWinControl;
|
||||||
FDragAndDropInitialized : boolean;
|
FDragAndDropInitialized : boolean;
|
||||||
FWebRTCIPHandlingPolicy : TCefWebRTCHandlingPolicy;
|
FWebRTCIPHandlingPolicy : TCefWebRTCHandlingPolicy;
|
||||||
FWebRTCMultipleRoutes : TCefState;
|
FWebRTCMultipleRoutes : TCefState;
|
||||||
FWebRTCNonProxiedUDP : TCefState;
|
FWebRTCNonProxiedUDP : TCefState;
|
||||||
|
{$IFNDEF FPC}
|
||||||
FOldBrowserCompWndPrc : TFNWndProc;
|
FOldBrowserCompWndPrc : TFNWndProc;
|
||||||
FOldWidgetCompWndPrc : TFNWndProc;
|
FOldWidgetCompWndPrc : TFNWndProc;
|
||||||
FOldRenderCompWndPrc : TFNWndProc;
|
FOldRenderCompWndPrc : TFNWndProc;
|
||||||
FBrowserCompHWND : THandle;
|
|
||||||
FWidgetCompHWND : THandle;
|
|
||||||
FRenderCompHWND : THandle;
|
|
||||||
FBrowserCompStub : Pointer;
|
FBrowserCompStub : Pointer;
|
||||||
FWidgetCompStub : Pointer;
|
FWidgetCompStub : Pointer;
|
||||||
FRenderCompStub : Pointer;
|
FRenderCompStub : Pointer;
|
||||||
|
{$ENDIF}
|
||||||
|
FBrowserCompHWND : THandle;
|
||||||
|
FWidgetCompHWND : THandle;
|
||||||
|
FRenderCompHWND : THandle;
|
||||||
|
|
||||||
// ICefClient
|
// ICefClient
|
||||||
FOnProcessMessageReceived : TOnProcessMessageReceived;
|
FOnProcessMessageReceived : TOnProcessMessageReceived;
|
||||||
@ -219,9 +231,11 @@ type
|
|||||||
FOnPrefsAvailable : TOnPrefsAvailableEvent;
|
FOnPrefsAvailable : TOnPrefsAvailableEvent;
|
||||||
FOnCookiesDeleted : TOnCookiesDeletedEvent;
|
FOnCookiesDeleted : TOnCookiesDeletedEvent;
|
||||||
FOnResolvedHostAvailable : TOnResolvedIPsAvailableEvent;
|
FOnResolvedHostAvailable : TOnResolvedIPsAvailableEvent;
|
||||||
|
{$IFNDEF FPC}
|
||||||
FOnBrowserCompMsg : TOnCompMsgEvent;
|
FOnBrowserCompMsg : TOnCompMsgEvent;
|
||||||
FOnWidgetCompMsg : TOnCompMsgEvent;
|
FOnWidgetCompMsg : TOnCompMsgEvent;
|
||||||
FOnRenderCompMsg : TOnCompMsgEvent;
|
FOnRenderCompMsg : TOnCompMsgEvent;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
function GetIsLoading : boolean;
|
function GetIsLoading : boolean;
|
||||||
function GetMultithreadApp : boolean;
|
function GetMultithreadApp : boolean;
|
||||||
@ -232,7 +246,7 @@ type
|
|||||||
function GetHasBrowser : boolean;
|
function GetHasBrowser : boolean;
|
||||||
function GetCanGoBack : boolean;
|
function GetCanGoBack : boolean;
|
||||||
function GetCanGoForward : boolean;
|
function GetCanGoForward : boolean;
|
||||||
function GetDocumentURL : string;
|
function GetDocumentURL : ustring;
|
||||||
function GetZoomLevel : double;
|
function GetZoomLevel : double;
|
||||||
function GetZoomPct : double;
|
function GetZoomPct : double;
|
||||||
function GetIsPopUp : boolean;
|
function GetIsPopUp : boolean;
|
||||||
@ -243,7 +257,7 @@ type
|
|||||||
function GetVisibleNavigationEntry : ICefNavigationEntry;
|
function GetVisibleNavigationEntry : ICefNavigationEntry;
|
||||||
function GetHasValidMainFrame : boolean;
|
function GetHasValidMainFrame : boolean;
|
||||||
function GetFrameCount : NativeUInt;
|
function GetFrameCount : NativeUInt;
|
||||||
function GetRequestContextCache : string;
|
function GetRequestContextCache : ustring;
|
||||||
function GetRequestContextIsGlobal : boolean;
|
function GetRequestContextIsGlobal : boolean;
|
||||||
|
|
||||||
procedure SetDoNotTrack(aValue : boolean);
|
procedure SetDoNotTrack(aValue : boolean);
|
||||||
@ -259,14 +273,14 @@ type
|
|||||||
procedure SetImagesPrefs(aValue : integer);
|
procedure SetImagesPrefs(aValue : integer);
|
||||||
procedure SetProxyType(aValue : integer);
|
procedure SetProxyType(aValue : integer);
|
||||||
procedure SetProxyScheme(aValue : TCefProxyScheme);
|
procedure SetProxyScheme(aValue : TCefProxyScheme);
|
||||||
procedure SetProxyServer(const aValue : string);
|
procedure SetProxyServer(const aValue : ustring);
|
||||||
procedure SetProxyPort(aValue : integer);
|
procedure SetProxyPort(aValue : integer);
|
||||||
procedure SetProxyUsername(const aValue : string);
|
procedure SetProxyUsername(const aValue : ustring);
|
||||||
procedure SetProxyPassword(const aValue : string);
|
procedure SetProxyPassword(const aValue : ustring);
|
||||||
procedure SetProxyScriptURL(const aValue : string);
|
procedure SetProxyScriptURL(const aValue : ustring);
|
||||||
procedure SetProxyByPassList(const aValue : string);
|
procedure SetProxyByPassList(const aValue : ustring);
|
||||||
procedure SetCustomHeaderName(const aValue : string);
|
procedure SetCustomHeaderName(const aValue : ustring);
|
||||||
procedure SetCustomHeaderValue(const aValue : string);
|
procedure SetCustomHeaderValue(const aValue : ustring);
|
||||||
procedure SetZoomLevel(const aValue : double);
|
procedure SetZoomLevel(const aValue : double);
|
||||||
procedure SetZoomPct(const aValue : double);
|
procedure SetZoomPct(const aValue : double);
|
||||||
procedure SetZoomStep(aValue : byte);
|
procedure SetZoomStep(aValue : byte);
|
||||||
@ -283,13 +297,13 @@ type
|
|||||||
procedure InitializeEvents;
|
procedure InitializeEvents;
|
||||||
procedure InitializeSettings(var aSettings : TCefBrowserSettings);
|
procedure InitializeSettings(var aSettings : TCefBrowserSettings);
|
||||||
|
|
||||||
procedure GetPrintPDFSettings(var aSettings : TCefPdfPrintSettings; const aTitle, aURL : string);
|
procedure GetPrintPDFSettings(var aSettings : TCefPdfPrintSettings; const aTitle, aURL : ustring);
|
||||||
|
|
||||||
function UpdateProxyPrefs(const aBrowser: ICefBrowser) : boolean;
|
function UpdateProxyPrefs(const aBrowser: ICefBrowser) : boolean;
|
||||||
function UpdatePreference(const aBrowser: ICefBrowser; const aName : string; aValue : boolean) : boolean; overload;
|
function UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; aValue : boolean) : boolean; overload;
|
||||||
function UpdatePreference(const aBrowser: ICefBrowser; const aName : string; aValue : integer) : boolean; overload;
|
function UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; aValue : integer) : boolean; overload;
|
||||||
function UpdatePreference(const aBrowser: ICefBrowser; const aName : string; const aValue : double) : boolean; overload;
|
function UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; const aValue : double) : boolean; overload;
|
||||||
function UpdatePreference(const aBrowser: ICefBrowser; const aName, aValue : string) : boolean; overload;
|
function UpdatePreference(const aBrowser: ICefBrowser; const aName, aValue : ustring) : boolean; overload;
|
||||||
|
|
||||||
procedure HandleDictionary(const aDict : ICefDictionaryValue; var aResultSL : TStringList; const aRoot : string);
|
procedure HandleDictionary(const aDict : ICefDictionaryValue; var aResultSL : TStringList; const aRoot : string);
|
||||||
procedure HandleNull(const aValue : ICefValue; var aResultSL : TStringList; const aRoot, aKey : string);
|
procedure HandleNull(const aValue : ICefValue; var aResultSL : TStringList; const aRoot, aKey : string);
|
||||||
@ -322,9 +336,11 @@ type
|
|||||||
procedure FreeAndNilStub(var aStub : pointer);
|
procedure FreeAndNilStub(var aStub : pointer);
|
||||||
procedure CreateStub(const aMethod : TWndMethod; var aStub : Pointer);
|
procedure CreateStub(const aMethod : TWndMethod; var aStub : Pointer);
|
||||||
procedure WndProc(var aMessage: TMessage);
|
procedure WndProc(var aMessage: TMessage);
|
||||||
|
{$IFNDEF FPC}
|
||||||
procedure BrowserCompWndProc(var aMessage: TMessage);
|
procedure BrowserCompWndProc(var aMessage: TMessage);
|
||||||
procedure WidgetCompWndProc(var aMessage: TMessage);
|
procedure WidgetCompWndProc(var aMessage: TMessage);
|
||||||
procedure RenderCompWndProc(var aMessage: TMessage);
|
procedure RenderCompWndProc(var aMessage: TMessage);
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
procedure DragDropManager_OnDragEnter(Sender: TObject; const aDragData : ICefDragData; grfKeyState: Longint; pt: TPoint; var dwEffect: Longint);
|
procedure DragDropManager_OnDragEnter(Sender: TObject; const aDragData : ICefDragData; grfKeyState: Longint; pt: TPoint; var dwEffect: Longint);
|
||||||
procedure DragDropManager_OnDragOver(Sender: TObject; grfKeyState: Longint; pt: TPoint; var dwEffect: Longint);
|
procedure DragDropManager_OnDragOver(Sender: TObject; grfKeyState: Longint; pt: TPoint; var dwEffect: Longint);
|
||||||
@ -434,7 +450,7 @@ type
|
|||||||
// Custom
|
// Custom
|
||||||
procedure doCookiesDeleted(numDeleted : integer); virtual;
|
procedure doCookiesDeleted(numDeleted : integer); virtual;
|
||||||
procedure doPdfPrintFinished(aResultOK : boolean); virtual;
|
procedure doPdfPrintFinished(aResultOK : boolean); virtual;
|
||||||
procedure doTextResultAvailable(const aText : string); virtual;
|
procedure doTextResultAvailable(const aText : ustring); virtual;
|
||||||
procedure doUpdatePreferences(const aBrowser: ICefBrowser); virtual;
|
procedure doUpdatePreferences(const aBrowser: ICefBrowser); virtual;
|
||||||
procedure doUpdateOwnPreferences; virtual;
|
procedure doUpdateOwnPreferences; virtual;
|
||||||
function doSavePreferences : boolean; virtual;
|
function doSavePreferences : boolean; virtual;
|
||||||
@ -451,8 +467,8 @@ type
|
|||||||
function ShareRequestContext(var aContext : ICefRequestContext; const aHandler : ICefRequestContextHandler = nil) : boolean;
|
function ShareRequestContext(var aContext : ICefRequestContext; const aHandler : ICefRequestContextHandler = nil) : boolean;
|
||||||
procedure InitializeDragAndDrop(const aDropTargetCtrl : TWinControl);
|
procedure InitializeDragAndDrop(const aDropTargetCtrl : TWinControl);
|
||||||
procedure ShutdownDragAndDrop;
|
procedure ShutdownDragAndDrop;
|
||||||
function CreateBrowser(const aBrowserParent : TWinControl = nil; const aWindowName : string = ''; const aContext : ICefRequestContext = nil; const aCookiesPath : string = ''; aPersistSessionCookies : boolean = False) : boolean; overload; virtual;
|
function CreateBrowser(const aBrowserParent : TWinControl = nil; const aWindowName : ustring = ''; const aContext : ICefRequestContext = nil; const aCookiesPath : ustring = ''; aPersistSessionCookies : boolean = False) : boolean; overload; virtual;
|
||||||
function CreateBrowser(aParentHandle : HWND; aParentRect : TRect; const aWindowName : string = ''; const aContext : ICefRequestContext = nil; const aCookiesPath : string = ''; aPersistSessionCookies : boolean = False) : boolean; overload; virtual;
|
function CreateBrowser(aParentHandle : HWND; aParentRect : TRect; const aWindowName : ustring = ''; const aContext : ICefRequestContext = nil; const aCookiesPath : ustring = ''; aPersistSessionCookies : boolean = False) : boolean; overload; virtual;
|
||||||
|
|
||||||
procedure LoadURL(const aURL : ustring);
|
procedure LoadURL(const aURL : ustring);
|
||||||
procedure LoadString(const aString : ustring; const aURL : ustring = '');
|
procedure LoadString(const aString : ustring; const aURL : ustring = '');
|
||||||
@ -562,18 +578,17 @@ type
|
|||||||
property RenderHandle : THandle read FRenderCompHWND;
|
property RenderHandle : THandle read FRenderCompHWND;
|
||||||
property FrameIsFocused : boolean read GetFrameIsFocused;
|
property FrameIsFocused : boolean read GetFrameIsFocused;
|
||||||
property Initialized : boolean read GetInitialized;
|
property Initialized : boolean read GetInitialized;
|
||||||
property RequestContextCache : string read GetRequestContextCache;
|
property RequestContextCache : ustring read GetRequestContextCache;
|
||||||
property RequestContextIsGlobal : boolean read GetRequestContextIsGlobal;
|
property RequestContextIsGlobal : boolean read GetRequestContextIsGlobal;
|
||||||
property CookiePrefs : integer read FCookiePrefs write SetCookiePrefs;
|
property CookiePrefs : integer read FCookiePrefs write SetCookiePrefs;
|
||||||
property ImagesPrefs : integer read FImagesPrefs write SetImagesPrefs;
|
property ImagesPrefs : integer read FImagesPrefs write SetImagesPrefs;
|
||||||
property DocumentURL : string read GetDocumentURL;
|
property DocumentURL : ustring read GetDocumentURL;
|
||||||
property WindowName : string read FWindowName write FWindowName;
|
|
||||||
property ZoomLevel : double read GetZoomLevel write SetZoomLevel;
|
property ZoomLevel : double read GetZoomLevel write SetZoomLevel;
|
||||||
property ZoomPct : double read GetZoomPct write SetZoomPct;
|
property ZoomPct : double read GetZoomPct write SetZoomPct;
|
||||||
property ZoomStep : byte read FZoomStep write SetZoomStep;
|
property ZoomStep : byte read FZoomStep write SetZoomStep;
|
||||||
property WindowlessFrameRate : integer read GetWindowlessFrameRate write SetWindowlessFrameRate;
|
property WindowlessFrameRate : integer read GetWindowlessFrameRate write SetWindowlessFrameRate;
|
||||||
property CustomHeaderName : string read FCustomHeaderName write SetCustomHeaderName;
|
property CustomHeaderName : ustring read FCustomHeaderName write SetCustomHeaderName;
|
||||||
property CustomHeaderValue : string read FCustomHeaderValue write SetCustomHeaderValue;
|
property CustomHeaderValue : ustring read FCustomHeaderValue write SetCustomHeaderValue;
|
||||||
property DoNotTrack : boolean read FDoNotTrack write SetDoNotTrack;
|
property DoNotTrack : boolean read FDoNotTrack write SetDoNotTrack;
|
||||||
property SendReferrer : boolean read FSendReferrer write SetSendReferrer;
|
property SendReferrer : boolean read FSendReferrer write SetSendReferrer;
|
||||||
property HyperlinkAuditing : boolean read FHyperlinkAuditing write SetHyperlinkAuditing;
|
property HyperlinkAuditing : boolean read FHyperlinkAuditing write SetHyperlinkAuditing;
|
||||||
@ -590,12 +605,12 @@ type
|
|||||||
|
|
||||||
property ProxyType : integer read FProxyType write SetProxyType;
|
property ProxyType : integer read FProxyType write SetProxyType;
|
||||||
property ProxyScheme : TCefProxyScheme read FProxyScheme write SetProxyScheme;
|
property ProxyScheme : TCefProxyScheme read FProxyScheme write SetProxyScheme;
|
||||||
property ProxyServer : string read FProxyServer write SetProxyServer;
|
property ProxyServer : ustring read FProxyServer write SetProxyServer;
|
||||||
property ProxyPort : integer read FProxyPort write SetProxyPort;
|
property ProxyPort : integer read FProxyPort write SetProxyPort;
|
||||||
property ProxyUsername : string read FProxyUsername write SetProxyUsername;
|
property ProxyUsername : ustring read FProxyUsername write SetProxyUsername;
|
||||||
property ProxyPassword : string read FProxyPassword write SetProxyPassword;
|
property ProxyPassword : ustring read FProxyPassword write SetProxyPassword;
|
||||||
property ProxyScriptURL : string read FProxyScriptURL write SetProxyScriptURL;
|
property ProxyScriptURL : ustring read FProxyScriptURL write SetProxyScriptURL;
|
||||||
property ProxyByPassList : string read FProxyByPassList write SetProxyByPassList;
|
property ProxyByPassList : ustring read FProxyByPassList write SetProxyByPassList;
|
||||||
|
|
||||||
published
|
published
|
||||||
property OnTextResultAvailable : TOnTextResultAvailableEvent read FOnTextResultAvailable write FOnTextResultAvailable;
|
property OnTextResultAvailable : TOnTextResultAvailableEvent read FOnTextResultAvailable write FOnTextResultAvailable;
|
||||||
@ -603,9 +618,11 @@ type
|
|||||||
property OnPrefsAvailable : TOnPrefsAvailableEvent read FOnPrefsAvailable write FOnPrefsAvailable;
|
property OnPrefsAvailable : TOnPrefsAvailableEvent read FOnPrefsAvailable write FOnPrefsAvailable;
|
||||||
property OnCookiesDeleted : TOnCookiesDeletedEvent read FOnCookiesDeleted write FOnCookiesDeleted;
|
property OnCookiesDeleted : TOnCookiesDeletedEvent read FOnCookiesDeleted write FOnCookiesDeleted;
|
||||||
property OnResolvedHostAvailable : TOnResolvedIPsAvailableEvent read FOnResolvedHostAvailable write FOnResolvedHostAvailable;
|
property OnResolvedHostAvailable : TOnResolvedIPsAvailableEvent read FOnResolvedHostAvailable write FOnResolvedHostAvailable;
|
||||||
|
{$IFNDEF FPC}
|
||||||
property OnBrowserCompMsg : TOnCompMsgEvent read FOnBrowserCompMsg write FOnBrowserCompMsg;
|
property OnBrowserCompMsg : TOnCompMsgEvent read FOnBrowserCompMsg write FOnBrowserCompMsg;
|
||||||
property OnWidgetCompMsg : TOnCompMsgEvent read FOnWidgetCompMsg write FOnWidgetCompMsg;
|
property OnWidgetCompMsg : TOnCompMsgEvent read FOnWidgetCompMsg write FOnWidgetCompMsg;
|
||||||
property OnRenderCompMsg : TOnCompMsgEvent read FOnRenderCompMsg write FOnRenderCompMsg;
|
property OnRenderCompMsg : TOnCompMsgEvent read FOnRenderCompMsg write FOnRenderCompMsg;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
// ICefClient
|
// ICefClient
|
||||||
property OnProcessMessageReceived : TOnProcessMessageReceived read FOnProcessMessageReceived write FOnProcessMessageReceived;
|
property OnProcessMessageReceived : TOnProcessMessageReceived read FOnProcessMessageReceived write FOnProcessMessageReceived;
|
||||||
@ -706,6 +723,10 @@ type
|
|||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
procedure Register;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
@ -715,7 +736,7 @@ uses
|
|||||||
SysUtils, Math,
|
SysUtils, Math,
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
uCEFBrowser, uCEFValue, uCEFDictionaryValue, uCEFStringMultimap, uCEFFrame,
|
uCEFBrowser, uCEFValue, uCEFDictionaryValue, uCEFStringMultimap, uCEFFrame,
|
||||||
uCEFApplication, uCEFProcessMessage, uCEFRequestContext, uOLEDragAndDrop,
|
uCEFApplication, uCEFProcessMessage, uCEFRequestContext, {$IFNDEF FPC}uOLEDragAndDrop,{$ENDIF}
|
||||||
uCEFPDFPrintCallback, uCEFResolveCallback, uCEFDeleteCookiesCallback, uCEFStringVisitor;
|
uCEFPDFPrintCallback, uCEFResolveCallback, uCEFDeleteCookiesCallback, uCEFStringVisitor;
|
||||||
|
|
||||||
constructor TChromium.Create(AOwner: TComponent);
|
constructor TChromium.Create(AOwner: TComponent);
|
||||||
@ -746,19 +767,22 @@ begin
|
|||||||
FCookiePrefs := CEF_CONTENT_SETTING_ALLOW;
|
FCookiePrefs := CEF_CONTENT_SETTING_ALLOW;
|
||||||
FImagesPrefs := CEF_CONTENT_SETTING_ALLOW;
|
FImagesPrefs := CEF_CONTENT_SETTING_ALLOW;
|
||||||
FZoomStep := ZOOM_STEP_DEF;
|
FZoomStep := ZOOM_STEP_DEF;
|
||||||
FWindowName := '';
|
{$IFNDEF FPC}
|
||||||
FOldBrowserCompWndPrc := nil;
|
FOldBrowserCompWndPrc := nil;
|
||||||
FOldWidgetCompWndPrc := nil;
|
FOldWidgetCompWndPrc := nil;
|
||||||
FOldRenderCompWndPrc := nil;
|
FOldRenderCompWndPrc := nil;
|
||||||
FBrowserCompHWND := 0;
|
|
||||||
FWidgetCompHWND := 0;
|
|
||||||
FRenderCompHWND := 0;
|
|
||||||
FBrowserCompStub := nil;
|
FBrowserCompStub := nil;
|
||||||
FWidgetCompStub := nil;
|
FWidgetCompStub := nil;
|
||||||
FRenderCompStub := nil;
|
FRenderCompStub := nil;
|
||||||
|
{$ENDIF}
|
||||||
|
FBrowserCompHWND := 0;
|
||||||
|
FWidgetCompHWND := 0;
|
||||||
|
FRenderCompHWND := 0;
|
||||||
|
|
||||||
FDragOperations := DRAG_OPERATION_NONE;
|
FDragOperations := DRAG_OPERATION_NONE;
|
||||||
|
{$IFNDEF FPC}
|
||||||
FDragDropManager := nil;
|
FDragDropManager := nil;
|
||||||
|
{$ENDIF}
|
||||||
FDropTargetCtrl := nil;
|
FDropTargetCtrl := nil;
|
||||||
FDragAndDropInitialized := False;
|
FDragAndDropInitialized := False;
|
||||||
|
|
||||||
@ -790,7 +814,9 @@ destructor TChromium.Destroy;
|
|||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
try
|
try
|
||||||
|
{$IFNDEF FPC}
|
||||||
if (FDragDropManager <> nil) then FreeAndNil(FDragDropManager);
|
if (FDragDropManager <> nil) then FreeAndNil(FDragDropManager);
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
if (FCompHandle <> 0) then
|
if (FCompHandle <> 0) then
|
||||||
begin
|
begin
|
||||||
@ -814,6 +840,7 @@ end;
|
|||||||
|
|
||||||
procedure TChromium.BeforeDestruction;
|
procedure TChromium.BeforeDestruction;
|
||||||
begin
|
begin
|
||||||
|
{$IFNDEF FPC}
|
||||||
if (FBrowserCompHWND <> 0) and (FOldBrowserCompWndPrc <> nil) then
|
if (FBrowserCompHWND <> 0) and (FOldBrowserCompWndPrc <> nil) then
|
||||||
begin
|
begin
|
||||||
SetWindowLongPtr(FBrowserCompHWND, GWL_WNDPROC, NativeInt(FOldBrowserCompWndPrc));
|
SetWindowLongPtr(FBrowserCompHWND, GWL_WNDPROC, NativeInt(FOldBrowserCompWndPrc));
|
||||||
@ -834,6 +861,7 @@ begin
|
|||||||
FreeAndNilStub(FRenderCompStub);
|
FreeAndNilStub(FRenderCompStub);
|
||||||
FOldRenderCompWndPrc := nil;
|
FOldRenderCompWndPrc := nil;
|
||||||
end;
|
end;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
DestroyClientHandler;
|
DestroyClientHandler;
|
||||||
|
|
||||||
@ -875,13 +903,22 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.AfterConstruction;
|
procedure TChromium.AfterConstruction;
|
||||||
|
{$IFDEF FPC}
|
||||||
|
var
|
||||||
|
TempWndMethod : TWndMethod;
|
||||||
|
{$ENDIF}
|
||||||
begin
|
begin
|
||||||
inherited AfterConstruction;
|
inherited AfterConstruction;
|
||||||
|
|
||||||
try
|
try
|
||||||
if not(csDesigning in ComponentState) then
|
if not(csDesigning in ComponentState) then
|
||||||
begin
|
begin
|
||||||
|
{$IFDEF FPC}
|
||||||
|
TempWndMethod := @WndProc;
|
||||||
|
FCompHandle := AllocateHWnd(TempWndMethod);
|
||||||
|
{$ELSE}
|
||||||
FCompHandle := AllocateHWnd(WndProc);
|
FCompHandle := AllocateHWnd(WndProc);
|
||||||
|
{$ENDIF}
|
||||||
FOptions := TChromiumOptions.Create;
|
FOptions := TChromiumOptions.Create;
|
||||||
FFontOptions := TChromiumFontOptions.Create;
|
FFontOptions := TChromiumFontOptions.Create;
|
||||||
FPDFPrintOptions := TPDFPrintOptions.Create;
|
FPDFPrintOptions := TPDFPrintOptions.Create;
|
||||||
@ -1039,15 +1076,17 @@ begin
|
|||||||
FOnPrefsAvailable := nil;
|
FOnPrefsAvailable := nil;
|
||||||
FOnCookiesDeleted := nil;
|
FOnCookiesDeleted := nil;
|
||||||
FOnResolvedHostAvailable := nil;
|
FOnResolvedHostAvailable := nil;
|
||||||
|
{$IFNDEF FPC}
|
||||||
FOnBrowserCompMsg := nil;
|
FOnBrowserCompMsg := nil;
|
||||||
FOnWidgetCompMsg := nil;
|
FOnWidgetCompMsg := nil;
|
||||||
FOnRenderCompMsg := nil;
|
FOnRenderCompMsg := nil;
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.CreateBrowser(const aBrowserParent : TWinControl;
|
function TChromium.CreateBrowser(const aBrowserParent : TWinControl;
|
||||||
const aWindowName : string;
|
const aWindowName : ustring;
|
||||||
const aContext : ICefRequestContext;
|
const aContext : ICefRequestContext;
|
||||||
const aCookiesPath : string;
|
const aCookiesPath : ustring;
|
||||||
aPersistSessionCookies : boolean) : boolean;
|
aPersistSessionCookies : boolean) : boolean;
|
||||||
var
|
var
|
||||||
TempHandle : HWND;
|
TempHandle : HWND;
|
||||||
@ -1069,9 +1108,9 @@ end;
|
|||||||
|
|
||||||
function TChromium.CreateBrowser( aParentHandle : HWND;
|
function TChromium.CreateBrowser( aParentHandle : HWND;
|
||||||
aParentRect : TRect;
|
aParentRect : TRect;
|
||||||
const aWindowName : string;
|
const aWindowName : ustring;
|
||||||
const aContext : ICefRequestContext;
|
const aContext : ICefRequestContext;
|
||||||
const aCookiesPath : string;
|
const aCookiesPath : ustring;
|
||||||
aPersistSessionCookies : boolean) : boolean;
|
aPersistSessionCookies : boolean) : boolean;
|
||||||
var
|
var
|
||||||
TempCookieManager : ICefCookieManager;
|
TempCookieManager : ICefCookieManager;
|
||||||
@ -1127,6 +1166,7 @@ procedure TChromium.InitializeDragAndDrop(const aDropTargetCtrl : TWinControl);
|
|||||||
var
|
var
|
||||||
TempDropTarget : IDropTarget;
|
TempDropTarget : IDropTarget;
|
||||||
begin
|
begin
|
||||||
|
{$IFNDEF FPC}
|
||||||
if FIsOSR and
|
if FIsOSR and
|
||||||
not(FDragAndDropInitialized) and
|
not(FDragAndDropInitialized) and
|
||||||
(FDragDropManager = nil) and
|
(FDragDropManager = nil) and
|
||||||
@ -1146,6 +1186,7 @@ begin
|
|||||||
|
|
||||||
FDragAndDropInitialized := True;
|
FDragAndDropInitialized := True;
|
||||||
end;
|
end;
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.ShareRequestContext(var aContext : ICefRequestContext;
|
function TChromium.ShareRequestContext(var aContext : ICefRequestContext;
|
||||||
@ -1394,7 +1435,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.GetPrintPDFSettings(var aSettings : TCefPdfPrintSettings; const aTitle, aURL : string);
|
procedure TChromium.GetPrintPDFSettings(var aSettings : TCefPdfPrintSettings; const aTitle, aURL : ustring);
|
||||||
begin
|
begin
|
||||||
if (FPDFPrintOptions <> nil) then
|
if (FPDFPrintOptions <> nil) then
|
||||||
begin
|
begin
|
||||||
@ -1630,7 +1671,7 @@ begin
|
|||||||
Result := 0;
|
Result := 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.GetRequestContextCache : string;
|
function TChromium.GetRequestContextCache : ustring;
|
||||||
begin
|
begin
|
||||||
if Initialized then
|
if Initialized then
|
||||||
Result := FBrowser.host.RequestContext.CachePath
|
Result := FBrowser.host.RequestContext.CachePath
|
||||||
@ -1671,7 +1712,7 @@ begin
|
|||||||
Result := FInitialized and not(FClosing) and (FBrowser <> nil);
|
Result := FInitialized and not(FClosing) and (FBrowser <> nil);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.GetDocumentURL : string;
|
function TChromium.GetDocumentURL : ustring;
|
||||||
var
|
var
|
||||||
TempFrame : ICefFrame;
|
TempFrame : ICefFrame;
|
||||||
begin
|
begin
|
||||||
@ -1877,7 +1918,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetProxyServer(const aValue : string);
|
procedure TChromium.SetProxyServer(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FProxyServer <> aValue) then
|
if (FProxyServer <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1895,7 +1936,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetProxyUsername(const aValue : string);
|
procedure TChromium.SetProxyUsername(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FProxyUsername <> aValue) then
|
if (FProxyUsername <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1904,7 +1945,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetProxyPassword(const aValue : string);
|
procedure TChromium.SetProxyPassword(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FProxyPassword <> aValue) then
|
if (FProxyPassword <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1913,7 +1954,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetProxyScriptURL(const aValue : string);
|
procedure TChromium.SetProxyScriptURL(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FProxyScriptURL <> aValue) then
|
if (FProxyScriptURL <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1922,7 +1963,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetProxyByPassList(const aValue : string);
|
procedure TChromium.SetProxyByPassList(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FProxyByPassList <> aValue) then
|
if (FProxyByPassList <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1931,7 +1972,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetCustomHeaderName(const aValue : string);
|
procedure TChromium.SetCustomHeaderName(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FCustomHeaderName <> aValue) then
|
if (FCustomHeaderName <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -1940,7 +1981,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.SetCustomHeaderValue(const aValue : string);
|
procedure TChromium.SetCustomHeaderValue(const aValue : ustring);
|
||||||
begin
|
begin
|
||||||
if (FCustomHeaderValue <> aValue) then
|
if (FCustomHeaderValue <> aValue) then
|
||||||
begin
|
begin
|
||||||
@ -2293,7 +2334,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : string; aValue : boolean) : boolean;
|
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; aValue : boolean) : boolean;
|
||||||
var
|
var
|
||||||
TempError : ustring;
|
TempError : ustring;
|
||||||
TempValue : ICefValue;
|
TempValue : ICefValue;
|
||||||
@ -2323,7 +2364,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : string; aValue : integer) : boolean;
|
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; aValue : integer) : boolean;
|
||||||
var
|
var
|
||||||
TempError : ustring;
|
TempError : ustring;
|
||||||
TempValue : ICefValue;
|
TempValue : ICefValue;
|
||||||
@ -2348,7 +2389,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : string; const aValue : double) : boolean;
|
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName : ustring; const aValue : double) : boolean;
|
||||||
var
|
var
|
||||||
TempError : ustring;
|
TempError : ustring;
|
||||||
TempValue : ICefValue;
|
TempValue : ICefValue;
|
||||||
@ -2373,7 +2414,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName, aValue : string) : boolean;
|
function TChromium.UpdatePreference(const aBrowser: ICefBrowser; const aName, aValue : ustring) : boolean;
|
||||||
var
|
var
|
||||||
TempError : ustring;
|
TempError : ustring;
|
||||||
TempValue : ICefValue;
|
TempValue : ICefValue;
|
||||||
@ -2740,7 +2781,7 @@ begin
|
|||||||
Result := (FCompHandle <> 0) and PostMessage(FCompHandle, aMsg, wParam, lParam);
|
Result := (FCompHandle <> 0) and PostMessage(FCompHandle, aMsg, wParam, lParam);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.doTextResultAvailable(const aText : string);
|
procedure TChromium.doTextResultAvailable(const aText : ustring);
|
||||||
begin
|
begin
|
||||||
if assigned(FOnTextResultAvailable) then FOnTextResultAvailable(self, aText);
|
if assigned(FOnTextResultAvailable) then FOnTextResultAvailable(self, aText);
|
||||||
end;
|
end;
|
||||||
@ -2861,6 +2902,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$IFNDEF FPC}
|
||||||
procedure TChromium.BrowserCompWndProc(var aMessage: TMessage);
|
procedure TChromium.BrowserCompWndProc(var aMessage: TMessage);
|
||||||
var
|
var
|
||||||
TempHandled : boolean;
|
TempHandled : boolean;
|
||||||
@ -2932,6 +2974,7 @@ begin
|
|||||||
if CustomExceptionHandler('TChromium.RenderCompWndProc', e) then raise;
|
if CustomExceptionHandler('TChromium.RenderCompWndProc', e) then raise;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
function TChromium.doOnClose(const browser: ICefBrowser): Boolean;
|
function TChromium.doOnClose(const browser: ICefBrowser): Boolean;
|
||||||
begin
|
begin
|
||||||
@ -3448,6 +3491,7 @@ begin
|
|||||||
if (FWidgetCompHWND <> 0) then
|
if (FWidgetCompHWND <> 0) then
|
||||||
FRenderCompHWND := FindWindowEx(FWidgetCompHWND, 0, 'Chrome_RenderWidgetHostHWND', 'Chrome Legacy Window');
|
FRenderCompHWND := FindWindowEx(FWidgetCompHWND, 0, 'Chrome_RenderWidgetHostHWND', 'Chrome Legacy Window');
|
||||||
|
|
||||||
|
{$IFNDEF FPC}
|
||||||
if assigned(FOnBrowserCompMsg) and (FBrowserCompHWND <> 0) and (FOldBrowserCompWndPrc = nil) then
|
if assigned(FOnBrowserCompMsg) and (FBrowserCompHWND <> 0) and (FOldBrowserCompWndPrc = nil) then
|
||||||
begin
|
begin
|
||||||
CreateStub(BrowserCompWndProc, FBrowserCompStub);
|
CreateStub(BrowserCompWndProc, FBrowserCompStub);
|
||||||
@ -3471,6 +3515,7 @@ begin
|
|||||||
GWL_WNDPROC,
|
GWL_WNDPROC,
|
||||||
NativeInt(FRenderCompStub)));
|
NativeInt(FRenderCompStub)));
|
||||||
end;
|
end;
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
if Assigned(FOnRenderViewReady) then FOnRenderViewReady(Self, browser);
|
if Assigned(FOnRenderViewReady) then FOnRenderViewReady(Self, browser);
|
||||||
@ -3557,7 +3602,7 @@ function TChromium.doOnStartDragging(const browser : ICefBrowser;
|
|||||||
y : Integer): Boolean;
|
y : Integer): Boolean;
|
||||||
begin
|
begin
|
||||||
Result := False;
|
Result := False;
|
||||||
|
{$IFNDEF FPC}
|
||||||
if FDragAndDropInitialized and
|
if FDragAndDropInitialized and
|
||||||
FDragDropManager.CloneDragData(dragData, allowedOps) then
|
FDragDropManager.CloneDragData(dragData, allowedOps) then
|
||||||
begin
|
begin
|
||||||
@ -3566,6 +3611,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
if Assigned(FOnStartDragging) then FOnStartDragging(Self, browser, dragData, allowedOps, x, y, Result);
|
if Assigned(FOnStartDragging) then FOnStartDragging(Self, browser, dragData, allowedOps, x, y, Result);
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.DelayedDragging;
|
procedure TChromium.DelayedDragging;
|
||||||
@ -3573,6 +3619,7 @@ var
|
|||||||
TempOperation : TCefDragOperation;
|
TempOperation : TCefDragOperation;
|
||||||
TempPoint : TPoint;
|
TempPoint : TPoint;
|
||||||
begin
|
begin
|
||||||
|
{$IFNDEF FPC}
|
||||||
if FDragAndDropInitialized and (FDropTargetCtrl <> nil) and (GlobalCEFApp <> nil) then
|
if FDragAndDropInitialized and (FDropTargetCtrl <> nil) and (GlobalCEFApp <> nil) then
|
||||||
begin
|
begin
|
||||||
FDragOperations := DRAG_OPERATION_NONE;
|
FDragOperations := DRAG_OPERATION_NONE;
|
||||||
@ -3586,6 +3633,7 @@ begin
|
|||||||
DragSourceEndedAt(TempPoint.x, TempPoint.y, TempOperation);
|
DragSourceEndedAt(TempPoint.x, TempPoint.y, TempOperation);
|
||||||
DragSourceSystemDragEnded;
|
DragSourceSystemDragEnded;
|
||||||
end;
|
end;
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TChromium.doOnStatusMessage(const browser: ICefBrowser; const value: ustring);
|
procedure TChromium.doOnStatusMessage(const browser: ICefBrowser; const value: ustring);
|
||||||
@ -3832,4 +3880,12 @@ begin
|
|||||||
if Initialized then FBrowser.Host.DragSourceSystemDragEnded;
|
if Initialized then FBrowser.Host.DragSourceSystemDragEnded;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
procedure Register;
|
||||||
|
begin
|
||||||
|
{$I tchromium.lrs}
|
||||||
|
RegisterComponents('Chromium', [TChromium]);
|
||||||
|
end;
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -10,7 +10,7 @@
|
|||||||
// For more information about CEF4Delphi visit :
|
// For more information about CEF4Delphi visit :
|
||||||
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
// https://www.briskbard.com/index.php?lang=en&pageid=cef
|
||||||
//
|
//
|
||||||
// Copyright © 2018 Salvador Díaz Fau. All rights reserved.
|
// Copyright © 2018 Salvador Diaz Fau. All rights reserved.
|
||||||
//
|
//
|
||||||
// ************************************************************************
|
// ************************************************************************
|
||||||
// ************ vvvv Original license and comments below vvvv *************
|
// ************ vvvv Original license and comments below vvvv *************
|
||||||
@ -37,6 +37,10 @@
|
|||||||
|
|
||||||
unit uCEFChromiumEvents;
|
unit uCEFChromiumEvents;
|
||||||
|
|
||||||
|
{$IFDEF FPC}
|
||||||
|
{$MODE OBJFPC}{$H+}
|
||||||
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFNDEF CPUX64}
|
{$IFNDEF CPUX64}
|
||||||
{$ALIGN ON}
|
{$ALIGN ON}
|
||||||
{$MINENUMSIZE 4}
|
{$MINENUMSIZE 4}
|
||||||
@ -153,7 +157,7 @@ type
|
|||||||
TOnFindResult = procedure(Sender: TObject; const browser: ICefBrowser; identifier, count: Integer; const selectionRect: PCefRect; activeMatchOrdinal: Integer; finalUpdate: Boolean) of Object;
|
TOnFindResult = procedure(Sender: TObject; const browser: ICefBrowser; identifier, count: Integer; const selectionRect: PCefRect; activeMatchOrdinal: Integer; finalUpdate: Boolean) of Object;
|
||||||
|
|
||||||
// Custom
|
// Custom
|
||||||
TOnTextResultAvailableEvent = procedure(Sender: TObject; const aText : string) of object;
|
TOnTextResultAvailableEvent = procedure(Sender: TObject; const aText : ustring) of object;
|
||||||
TOnPdfPrintFinishedEvent = procedure(Sender: TObject; aResultOK : boolean) of object;
|
TOnPdfPrintFinishedEvent = procedure(Sender: TObject; aResultOK : boolean) of object;
|
||||||
TOnPrefsAvailableEvent = procedure(Sender: TObject; aResultOK : boolean) of object;
|
TOnPrefsAvailableEvent = procedure(Sender: TObject; aResultOK : boolean) of object;
|
||||||
TOnCookiesDeletedEvent = procedure(Sender: TObject; numDeleted : integer) of object;
|
TOnCookiesDeletedEvent = procedure(Sender: TObject; numDeleted : integer) of object;
|
||||||
|
|||||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
x
Reference in New Issue
Block a user