1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00

Update to CEF 3.3282.1731.gfc9a4fa

- Chromium 64.0.3282.119 which should include partial MP3 support.
- Fixed stability issues when you closed the browser due to circular interface references.
- Fixed TCefRTTIExtension thanks to Pier.
- Added the JSRTTIExtension demo to test TCefRTTIExtension.
- Added the TCustomResponseFilter class to filter the resource contents.
- Added the ResponseFilterBrowser demo to test the new TCustomResponseFilter class.
This commit is contained in:
Salvador Díaz Fau
2018-02-03 17:52:48 +01:00
parent fed1c04a3f
commit e29989623e
52 changed files with 4053 additions and 954 deletions

View File

@@ -58,7 +58,6 @@ type
TCefResolveCallbackOwn = class(TCefBaseRefCountedOwn, ICefResolveCallback)
protected
procedure OnResolveCompleted(result: TCefErrorCode; const resolvedIps: TStrings); virtual; abstract;
procedure InitializeVars; virtual; abstract;
public
constructor Create; virtual;
@@ -66,13 +65,13 @@ type
TCefCustomResolveCallback = class(TCefResolveCallbackOwn)
protected
FChromiumBrowser : IChromiumEvents;
FEvents : Pointer;
procedure OnResolveCompleted(result: TCefErrorCode; const resolvedIps: TStrings); override;
public
constructor Create(const aChromiumBrowser : IChromiumEvents); reintroduce;
constructor Create(const aEvents : IChromiumEvents); reintroduce;
destructor Destroy; override;
procedure InitializeVars; override;
end;
implementation
@@ -126,28 +125,32 @@ end;
// TCefCustomResolveCallback
constructor TCefCustomResolveCallback.Create(const aChromiumBrowser : IChromiumEvents);
constructor TCefCustomResolveCallback.Create(const aEvents : IChromiumEvents);
begin
inherited Create;
FChromiumBrowser := aChromiumBrowser;
FEvents := Pointer(aEvents);
end;
destructor TCefCustomResolveCallback.Destroy;
begin
InitializeVars;
FEvents := nil;
inherited Destroy;
end;
procedure TCefCustomResolveCallback.InitializeVars;
begin
FChromiumBrowser := nil;
end;
procedure TCefCustomResolveCallback.OnResolveCompleted(result: TCefErrorCode; const resolvedIps: TStrings);
begin
if (FChromiumBrowser <> nil) then FChromiumBrowser.doResolvedHostAvailable(result, resolvedIps);
try
try
if (FEvents <> nil) then IChromiumEvents(FEvents).doResolvedHostAvailable(result, resolvedIps);
except
on e : exception do
if CustomExceptionHandler('TCefCustomResolveCallback.OnResolveCompleted', e) then raise;
end;
finally
FEvents := nil;
end;
end;
end.