pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-08-14 21:42:50 +02:00
Code Issues Actions 1 Releases Activity

Rollback the last fix for issue #288

Browse Source 
The last fix sometimes caused an exception while you close the browser.
This commit is contained in:
Salvador Díaz Fau
2020-07-13 15:28:04 +02:00
parent 4be703326c
commit 5bfeb8de3f
2 changed files with 3 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
source/uCEFChromiumCore.pas
View File

@@ -1424,13 +1424,8 @@ end;
procedure TChromiumCore.DestroyMediaObserver; procedure TChromiumCore.DestroyMediaObserver;
begin begin
FMediaObserverReg := nil; FMediaObserverReg := nil;
if (FMediaObserver <> nil) then
begin
FMediaObserver.DestroyOtherRefs;
FMediaObserver := nil; FMediaObserver := nil;
end; end;
end;
procedure TChromiumCore.CreateMediaObserver; procedure TChromiumCore.CreateMediaObserver;
begin begin
@@ -1442,13 +1437,8 @@ end;
procedure TChromiumCore.DestroyDevToolsMsgObserver; procedure TChromiumCore.DestroyDevToolsMsgObserver;
begin begin
FDevToolsMsgObserverReg := nil; FDevToolsMsgObserverReg := nil;
if (FDevToolsMsgObserver <> nil) then
begin
FDevToolsMsgObserver.DestroyOtherRefs;
FDevToolsMsgObserver := nil; FDevToolsMsgObserver := nil;
end; end;
end;
procedure TChromiumCore.CreateDevToolsMsgObserver; procedure TChromiumCore.CreateDevToolsMsgObserver;
begin begin

2
update_CEF4Delphi.json
View File

@@ -2,7 +2,7 @@
"UpdateLazPackages" : [ "UpdateLazPackages" : [
{ {
"ForceNotify" : true, "ForceNotify" : true,
"InternalVersion" : 158, "InternalVersion" : 159,
"Name" : "cef4delphi_lazarus.lpk", "Name" : "cef4delphi_lazarus.lpk",
"Version" : "83.4.2.0" "Version" : "83.4.2.0"
} }