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

Update to CEF 77.1.8

Browse Source
This commit is contained in:
Salvador Díaz Fau
2019-10-04 15:13:24 +02:00
parent ed327ed479
commit 33213f25e4
9 changed files with 99 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
README.md
View File

@ -3,10 +3,10 @@ CEF4Delphi is an open source project created by Salvador D
CEF4Delphi is based on DCEF3, made by Henri Gourvest. The original license of DCEF3 still applies to CEF4Delphi. Read the license terms in the first lines of any *.pas file. CEF4Delphi is based on DCEF3, made by Henri Gourvest. The original license of DCEF3 still applies to CEF4Delphi. Read the license terms in the first lines of any *.pas file.
CEF4Delphi uses CEF 77.1.7 which includes Chromium 77.0.3865.90. CEF4Delphi uses CEF 77.1.8 which includes Chromium 77.0.3865.90.
The CEF binaries used by CEF4Delphi are available for download at spotify : The CEF binaries used by CEF4Delphi are available for download at spotify :
* [32 bits](http://opensource.spotify.com/cefbuilds/cef_binary_77.1.7%2Bgc7dbc2f%2Bchromium-77.0.3865.90_windows32.tar.bz2) * [32 bits](http://opensource.spotify.com/cefbuilds/cef_binary_77.1.8%2Bg41b180d%2Bchromium-77.0.3865.90_windows32.tar.bz2)
* [64 bits](http://opensource.spotify.com/cefbuilds/cef_binary_77.1.7%2Bgc7dbc2f%2Bchromium-77.0.3865.90_windows64.tar.bz2) * [64 bits](http://opensource.spotify.com/cefbuilds/cef_binary_77.1.8%2Bg41b180d%2Bchromium-77.0.3865.90_windows64.tar.bz2)
CEF4Delphi was developed and tested on Delphi 10.3 Rio and it has been tested in Delphi 7, Delphi XE, Delphi 10, Delphi 10.2 and Lazarus 2.0.4/FPC 3.0.4. CEF4Delphi includes VCL, FireMonkey (FMX) and Lazarus components. CEF4Delphi was developed and tested on Delphi 10.3 Rio and it has been tested in Delphi 7, Delphi XE, Delphi 10, Delphi 10.2 and Lazarus 2.0.4/FPC 3.0.4. CEF4Delphi includes VCL, FireMonkey (FMX) and Lazarus components.

5
demos/Delphi_VCL/MiniBrowser/uMiniBrowser.pas
View File

@ -1156,8 +1156,11 @@ begin
end; end;
procedure TMiniBrowserFrm.CopyAllTextMsg(var aMessage : TMessage); procedure TMiniBrowserFrm.CopyAllTextMsg(var aMessage : TMessage);
var
TempName : string;
begin begin
Chromium1.RetrieveText; TempName := InputBox('Frame name', 'Type the fame name or leave it blank to select the main frame :', '');
Chromium1.RetrieveText(TempName);
end; end;
procedure TMiniBrowserFrm.CopyFramesIDsMsg(var aMessage : TMessage); procedure TMiniBrowserFrm.CopyFramesIDsMsg(var aMessage : TMessage);

71
demos/Delphi_VCL/MiniBrowser/uPreferences.dfm
View File

@ -4,7 +4,7 @@ object PreferencesFrm: TPreferencesFrm
BorderIcons = [biSystemMenu] BorderIcons = [biSystemMenu]
BorderStyle = bsSingle BorderStyle = bsSingle
Caption = 'Preferences' Caption = 'Preferences'
ClientHeight = 397 ClientHeight = 388
ClientWidth = 428 ClientWidth = 428
Color = clBtnFace Color = clBtnFace
Font.Charset = DEFAULT_CHARSET Font.Charset = DEFAULT_CHARSET
@ -13,33 +13,20 @@ object PreferencesFrm: TPreferencesFrm
Font.Name = 'Tahoma' Font.Name = 'Tahoma'
Font.Style = [] Font.Style = []
FormStyle = fsStayOnTop FormStyle = fsStayOnTop
Padding.Left = 10
Padding.Top = 10
Padding.Right = 10
Padding.Bottom = 10
OldCreateOrder = False OldCreateOrder = False
Position = poScreenCenter Position = poScreenCenter
PixelsPerInch = 96 PixelsPerInch = 96
TextHeight = 13 TextHeight = 13
object Button1: TButton
Left = 232
Top = 364
Width = 75
Height = 25
Caption = 'Ok'
ModalResult = 1
TabOrder = 2
end
object Button2: TButton
Left = 345
Top = 364
Width = 75
Height = 25
Caption = 'Cancel'
ModalResult = 2
TabOrder = 3
end
object GroupBox1: TGroupBox object GroupBox1: TGroupBox
Left = 8 Left = 10
Top = 8 Top = 10
Width = 412 Width = 408
Height = 250 Height = 250
Align = alTop
Caption = ' Proxy ' Caption = ' Proxy '
TabOrder = 0 TabOrder = 0
object ProxyTypeLbl: TLabel object ProxyTypeLbl: TLabel
@ -186,10 +173,11 @@ object PreferencesFrm: TPreferencesFrm
end end
end end
object GroupBox2: TGroupBox object GroupBox2: TGroupBox
Left = 8 Left = 10
Top = 271 Top = 260
Width = 412 Width = 408
Height = 84 Height = 84
Align = alTop
Caption = ' Custom header ' Caption = ' Custom header '
TabOrder = 1 TabOrder = 1
object HeaderNameLbl: TLabel object HeaderNameLbl: TLabel
@ -221,4 +209,37 @@ object PreferencesFrm: TPreferencesFrm
TabOrder = 1 TabOrder = 1
end end
end end
object Panel1: TPanel
Left = 10
Top = 353
Width = 408
Height = 25
Align = alBottom
BevelOuter = bvNone
Padding.Left = 30
Padding.Right = 30
TabOrder = 2
ExplicitTop = 373
object Button1: TButton
Left = 30
Top = 0
Width = 120
Height = 25
Align = alLeft
Caption = 'Ok'
ModalResult = 1
TabOrder = 0
end
object Button2: TButton
Left = 258
Top = 0
Width = 120
Height = 25
Align = alRight
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
ExplicitLeft = 278
end
end
end end

9
demos/Delphi_VCL/MiniBrowser/uPreferences.pas
View File

@ -44,16 +44,14 @@ interface
uses uses
{$IFDEF DELPHI16_UP} {$IFDEF DELPHI16_UP}
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Samples.Spin; Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Samples.Spin, Vcl.ExtCtrls;
{$ELSE} {$ELSE}
Windows, Messages, SysUtils, Variants, Classes, Graphics, Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls, Spin; Controls, Forms, Dialogs, StdCtrls, Spin, ExtCtrls;
{$ENDIF} {$ENDIF}
type type
TPreferencesFrm = class(TForm) TPreferencesFrm = class(TForm)
Button1: TButton;
Button2: TButton;
GroupBox1: TGroupBox; GroupBox1: TGroupBox;
ProxyTypeCbx: TComboBox; ProxyTypeCbx: TComboBox;
ProxyTypeLbl: TLabel; ProxyTypeLbl: TLabel;
@ -77,6 +75,9 @@ type
ProxySchemeCb: TComboBox; ProxySchemeCb: TComboBox;
MaxConnectionsPerProxyLbl: TLabel; MaxConnectionsPerProxyLbl: TLabel;
MaxConnectionsPerProxyEdt: TSpinEdit; MaxConnectionsPerProxyEdt: TSpinEdit;
Panel1: TPanel;
Button1: TButton;
Button2: TButton;
private private
{ Private declarations } { Private declarations }
public public

66
demos/Lazarus/MiniBrowser/MiniBrowser.lps
View File

@ -22,8 +22,8 @@
<ResourceBaseClass Value="Form"/> <ResourceBaseClass Value="Form"/>
<IsVisibleTab Value="True"/> <IsVisibleTab Value="True"/>
<EditorIndex Value="1"/> <EditorIndex Value="1"/>
<TopLine Value="276"/> <TopLine Value="1205"/>
<CursorPos X="44" Y="294"/> <CursorPos X="36" Y="1231"/>
<UsageCount Value="20"/> <UsageCount Value="20"/>
<Bookmarks Count="2"> <Bookmarks Count="2">
<Item0 X="3" Y="985" ID="1"/> <Item0 X="3" Y="985" ID="1"/>
@ -83,7 +83,7 @@
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="30" HistoryIndex="29">
<Position1> <Position1>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="576" Column="79" TopLine="51"/> <Caret Line="310" Column="64" TopLine="305"/>
</Position1> </Position1>
<Position2> <Position2>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
@ -91,115 +91,115 @@
</Position2> </Position2>
<Position3> <Position3>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="310" Column="64" TopLine="305"/> <Caret Line="182" Column="15" TopLine="160"/>
</Position3> </Position3>
<Position4> <Position4>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="182" Column="15" TopLine="160"/> <Caret Line="763" Column="26" TopLine="756"/>
</Position4> </Position4>
<Position5> <Position5>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="763" Column="26" TopLine="756"/> <Caret Line="768" Column="69" TopLine="749"/>
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="768" Column="69" TopLine="749"/> <Caret Line="769" Column="69" TopLine="750"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="769" Column="69" TopLine="750"/> <Caret Line="768" Column="69" TopLine="749"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="768" Column="69" TopLine="749"/> <Caret Line="162" Column="61" TopLine="143"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="162" Column="61" TopLine="143"/> <Caret Line="601" Column="52" TopLine="573"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="601" Column="52" TopLine="573"/> <Caret Line="590" Column="20" TopLine="573"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="uMiniBrowser.pas"/>
<Caret Line="590" Column="20" TopLine="573"/>
</Position11>
<Position12>
<Filename Value="MiniBrowser.lpr"/> <Filename Value="MiniBrowser.lpr"/>
<Caret Line="54" TopLine="46"/> <Caret Line="54" TopLine="46"/>
</Position11>
<Position12>
<Filename Value="uMiniBrowser.pas"/>
<Caret Line="261" Column="11" TopLine="245"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="261" Column="11" TopLine="245"/> <Caret Line="290" Column="76" TopLine="277"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="290" Column="76" TopLine="277"/> <Caret Line="1032" Column="50" TopLine="1015"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1032" Column="50" TopLine="1015"/> <Caret Line="1044" Column="93" TopLine="1031"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1044" Column="93" TopLine="1031"/> <Caret Line="1045" Column="93" TopLine="1032"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1045" Column="93" TopLine="1032"/> <Caret Line="1046" Column="93" TopLine="1033"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1046" Column="93" TopLine="1033"/> <Caret Line="1053" Column="93" TopLine="1040"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1053" Column="93" TopLine="1040"/> <Caret Line="307" Column="55" TopLine="299"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="307" Column="55" TopLine="299"/> <Caret Line="342" Column="9" TopLine="314"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="342" Column="9" TopLine="314"/> <Caret Line="350" TopLine="345"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="350" TopLine="345"/> <Caret Line="982" Column="56" TopLine="980"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="982" Column="56" TopLine="980"/> <Caret Line="1015" Column="66" TopLine="994"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="1015" Column="66" TopLine="994"/> <Caret Line="258" Column="5" TopLine="251"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="258" Column="5" TopLine="251"/> <Caret Line="988" Column="62" TopLine="980"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="988" Column="62" TopLine="980"/> <Caret Line="246" Column="77" TopLine="245"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="246" Column="77" TopLine="245"/> <Caret Line="388" Column="5" TopLine="364"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="388" Column="5" TopLine="364"/> <Caret Line="988" Column="26" TopLine="969"/>
</Position28> </Position28>
<Position29> <Position29>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="988" Column="26" TopLine="969"/> <Caret Line="258" Column="93" TopLine="245"/>
</Position29> </Position29>
<Position30> <Position30>
<Filename Value="uMiniBrowser.pas"/> <Filename Value="uMiniBrowser.pas"/>
<Caret Line="258" Column="93" TopLine="245"/> <Caret Line="288" Column="76" TopLine="276"/>
</Position30> </Position30>
</JumpHistory> </JumpHistory>
<RunParams> <RunParams>

5
demos/Lazarus/MiniBrowser/uMiniBrowser.pas
View File

@ -1224,8 +1224,11 @@ begin
end; end;
procedure TMiniBrowserFrm.CopyAllTextMsg(var aMessage : TMessage); procedure TMiniBrowserFrm.CopyAllTextMsg(var aMessage : TMessage);
var
TempName : string;
begin begin
Chromium1.RetrieveText; TempName := InputBox('Frame name', 'Type the fame name or leave it blank to select the main frame :', '');
Chromium1.RetrieveText(TempName);
end; end;
procedure TMiniBrowserFrm.CopyFramesIDsMsg(var aMessage : TMessage); procedure TMiniBrowserFrm.CopyFramesIDsMsg(var aMessage : TMessage);

2
packages/cef4delphi_lazarus.lpk
View File

@ -21,7 +21,7 @@
</CompilerOptions> </CompilerOptions>
<Description Value="CEF4Delphi is an open source project created by Salvador Díaz Fau to embed Chromium-based browsers in applications made with Delphi or Lazarus/FPC."/> <Description Value="CEF4Delphi is an open source project created by Salvador Díaz Fau to embed Chromium-based browsers in applications made with Delphi or Lazarus/FPC."/>
<License Value="MPL 1.1"/> <License Value="MPL 1.1"/>
<Version Major="77" Minor="1" Release="7"/> <Version Major="77" Minor="1" Release="8"/>
<Files Count="142"> <Files Count="142">
<Item1> <Item1>
<Filename Value="..\source\uCEFAccessibilityHandler.pas"/> <Filename Value="..\source\uCEFAccessibilityHandler.pas"/>

2
source/uCEFApplication.pas
View File

@ -62,7 +62,7 @@ uses
const const
CEF_SUPPORTED_VERSION_MAJOR = 77; CEF_SUPPORTED_VERSION_MAJOR = 77;
CEF_SUPPORTED_VERSION_MINOR = 1; CEF_SUPPORTED_VERSION_MINOR = 1;
CEF_SUPPORTED_VERSION_RELEASE = 7; CEF_SUPPORTED_VERSION_RELEASE = 8;
CEF_SUPPORTED_VERSION_BUILD = 0; CEF_SUPPORTED_VERSION_BUILD = 0;
CEF_CHROMEELF_VERSION_MAJOR = 77; CEF_CHROMEELF_VERSION_MAJOR = 77;

4
update_CEF4Delphi.json
View File

@ -2,9 +2,9 @@
"UpdateLazPackages" : [ "UpdateLazPackages" : [
{ {
"ForceNotify" : false, "ForceNotify" : false,
"InternalVersion" : 36, "InternalVersion" : 37,
"Name" : "cef4delphi_lazarus.lpk", "Name" : "cef4delphi_lazarus.lpk",
"Version" : "77.1.7.0" "Version" : "77.1.8.0"
} }
], ],
"UpdatePackageData" : { "UpdatePackageData" : {