From 6256c2c35f182b5f580f9096bccd27c0e4a3b8c2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Salvador=20D=C3=ADaz=20Fau?= Date: Thu, 14 Nov 2024 11:29:17 +0100 Subject: [PATCH] Convert GlobalCEFApp.LogFile to an absolute path --- source/uCEFApplicationCore.pas | 8 +++++++- update_CEF4Delphi.json | 2 +- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/source/uCEFApplicationCore.pas b/source/uCEFApplicationCore.pas index eac237f3..cddbc64b 100644 --- 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. /// - property LogFile : ustring read FLogFile write FLogFile; + property LogFile : ustring read FLogFile write SetLogFile; /// /// 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 index 27fde0f9..1eace908 100644 --- 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" }