pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-12-03 21:44:45 +02:00
Code Issues Actions Releases Activity

Update to CEF 3.3112.1659.gfef43e0

Browse Source 
- Update to CEF 3.3112.1659.gfef43e0
- Bug Fix #49
- Added longer error messages if the CEF binaries are not available.
- Added the AfterCreated event in TChromiumWindow.
- Added a 'Take a snapshot' button in the OSR demo.
This commit is contained in:
Salvador Díaz Fau
2017-09-07 10:58:09 +02:00
parent 60cc22a063
commit 379272e643
65 changed files with 1546 additions and 1300 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
demos/SimpleBrowser/uSimpleBrowser.pas
View File

@@ -54,11 +54,12 @@ uses
type
TForm1 = class(TForm)
ChromiumWindow1: TChromiumWindow;
Panel1: TPanel;
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
AddressPnl: TPanel;
AddressEdt: TEdit;
GoBtn: TButton;
procedure GoBtnClick(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure ChromiumWindow1AfterCreated(Sender: TObject);
private
procedure WMMove(var aMessage : TWMMove); message WM_MOVE;
procedure WMMoving(var aMessage : TMessage); message WM_MOVING;
@@ -73,9 +74,15 @@ implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
procedure TForm1.GoBtnClick(Sender: TObject);
begin
ChromiumWindow1.LoadURL(Edit1.Text);
ChromiumWindow1.LoadURL(AddressEdt.Text);
end;
procedure TForm1.ChromiumWindow1AfterCreated(Sender: TObject);
begin
AddressPnl.Enabled := True;
GoBtn.Click;
end;
procedure TForm1.FormShow(Sender: TObject);