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

Fixed possible access violation in Lazarus_Linux_QT6/SimpleBrowser

Browse Source
This commit is contained in:
Salvador Díaz Fau
2025-10-12 18:00:36 +02:00
parent 8d047e2525
commit f8834c063a
2 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
demos/Lazarus_Linux_QT6/SimpleBrowser/umainform.pas
View File

@@ -174,7 +174,7 @@ begin
FClosing := True; FClosing := True;
Visible := False; Visible := False;
Chromium1.CloseBrowser(True); Chromium1.CloseBrowser(True);
CEFLinkedWindowParent1.Free; FreeAndNil(CEFLinkedWindowParent1);
end; end;
end; end;
{%Endregion} {%Endregion}
@@ -219,7 +219,8 @@ end;
procedure TMainForm.BrowserSetFocusMsg(Data: PtrInt); procedure TMainForm.BrowserSetFocusMsg(Data: PtrInt);
begin begin
CEFLinkedWindowParent1.SetFocus; if assigned(CEFLinkedWindowParent1) then
CEFLinkedWindowParent1.SetFocus;
end; end;
procedure TMainForm.WMMove(var Message: TLMMove); procedure TMainForm.WMMove(var Message: TLMMove);

2
update_CEF4Delphi.json
View File

@@ -2,7 +2,7 @@
"UpdateLazPackages" : [ "UpdateLazPackages" : [
{ {
"ForceNotify" : true, "ForceNotify" : true,
"InternalVersion" : 799, "InternalVersion" : 800,
"Name" : "cef4delphi_lazarus.lpk", "Name" : "cef4delphi_lazarus.lpk",
"Version" : "140.1.14" "Version" : "140.1.14"
} }