Delphi/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2024-11-15 07:45:56 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Convert GlobalCEFApp.LogFile to an absolute path

Browse Source
This commit is contained in:
Salvador Díaz Fau 2024-11-14 11:29:17 +01:00
parent 00bf20f147
commit 6256c2c35f
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
source/uCEFApplicationCore.pas
View File

@ -246,6 +246,7 @@ type
procedure SetOsmodalLoop(aValue : boolean);
{$ENDIF}
procedure SetKioskPrinting(aValue : boolean);
procedure SetLogFile(const aValue : ustring);
function GetChromeVersion : ustring;
function GetLibCefVersion : ustring;
@ -650,7 +651,7 @@ type
/// [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 @@ begin
end;
end;
procedure TCefApplicationCore.SetLogFile(const aValue : ustring);
begin
FLogFile := CustomAbsolutePath(aValue, False);
end;
procedure TCefApplicationCore.UpdateDeviceScaleFactor;
begin
if (FForcedDeviceScaleFactor <> 0) then

2
update_CEF4Delphi.json
View File

@ -2,7 +2,7 @@
"UpdateLazPackages" : [
{
"ForceNotify" : true,
"InternalVersion" : 675,
"InternalVersion" : 676,
"Name" : "cef4delphi_lazarus.lpk",
"Version" : "130.1.16"
}