You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-22 22:17:48 +02:00
Update to CEF 134.3.1
This commit is contained in:
@ -202,6 +202,15 @@ type
|
||||
procedure Execute; override;
|
||||
end;
|
||||
|
||||
TCefAddPreferenceObserverTask = class(TCefChromiumTask)
|
||||
protected
|
||||
FName : ustring;
|
||||
procedure Execute; override;
|
||||
|
||||
public
|
||||
constructor Create(const aEvents : IChromiumEvents; const aName : ustring); reintroduce;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
uses
|
||||
@ -700,4 +709,29 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
|
||||
// TCefAddPreferenceObserverTask
|
||||
|
||||
constructor TCefAddPreferenceObserverTask.Create(const aEvents : IChromiumEvents; const aName : ustring);
|
||||
begin
|
||||
inherited Create(aEvents);
|
||||
|
||||
FName := aName;
|
||||
end;
|
||||
|
||||
procedure TCefAddPreferenceObserverTask.Execute;
|
||||
begin
|
||||
try
|
||||
try
|
||||
if CanExecute then
|
||||
IChromiumEvents(FEvents).doAddPreferenceObserver(FName);
|
||||
except
|
||||
on e : exception do
|
||||
if CustomExceptionHandler('TCefAddPreferenceObserverTask.Execute', e) then raise;
|
||||
end;
|
||||
finally
|
||||
FEvents := nil;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
Reference in New Issue
Block a user