Convert GlobalCEFApp.LogFile to an absolute path

salvadordf · Nov 14, 2024 · 6256c2c · 6256c2c
1 parent 00bf20f
commit 6256c2c
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 2 deletions.
diff --git a/source/uCEFApplicationCore.pas b/source/uCEFApplicationCore.pas
@@ -246,6 +246,7 @@   TCefApplicationCore = class(TInterfacedObject, IApplicationCoreEvents)
       procedure SetOsmodalLoop(aValue : boolean);
       {$ENDIF}
       procedure SetKioskPrinting(aValue : boolean);
+      procedure SetLogFile(const aValue : ustring);
 
       function  GetChromeVersion : ustring;
       function  GetLibCefVersion : ustring;
@@ -650,7 +651,7 @@   TCefApplicationCore = class(TInterfacedObject, IApplicationCoreEvents)
       /// [app name] is the name of the main app executable. Also configurable using
       /// the "log-file" command-line switch.
       /// </summary>
-      property LogFile                           : ustring                                  read FLogFile                           write FLogFile;
+      property LogFile                           : ustring                                  read FLogFile                           write SetLogFile;
       /// <summary>
       /// The log severity. Only messages of this severity level or higher will be
       /// logged. When set to DISABLE no messages will be written to the log file,
@@ -2741,6 +2742,11 @@ procedure TCefApplicationCore.SetKioskPrinting(aValue : boolean);
     end;
 end;
 
+procedure TCefApplicationCore.SetLogFile(const aValue : ustring);
+begin
+  FLogFile := CustomAbsolutePath(aValue, False);
+end;
+
 procedure TCefApplicationCore.UpdateDeviceScaleFactor;
 begin
   if (FForcedDeviceScaleFactor <> 0) then

diff --git a/update_CEF4Delphi.json b/update_CEF4Delphi.json
@@ -2,7 +2,7 @@
   "UpdateLazPackages" : [
     {
       "ForceNotify" : true,
-      "InternalVersion" : 675,
+      "InternalVersion" : 676,
       "Name" : "cef4delphi_lazarus.lpk",
       "Version" : "130.1.16"
     }