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" }