pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-12 22:07:39 +02:00
Code Issues Actions Releases Activity

Update to CEF 103.0.12

Browse Source 
Fixed issue #430 : GlobalCEFApp.DeleteCache deletes the cookies too.
This commit is contained in:
salvadordf
2022-07-21 14:11:32 +02:00
parent 2b0ba99e98
commit f218105a98
4 changed files with 24 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
source/uCEFApplicationCore.pas
View File

@ -68,13 +68,13 @@ uses
const
CEF_SUPPORTED_VERSION_MAJOR = 103;
CEF_SUPPORTED_VERSION_MINOR = 0;
CEF_SUPPORTED_VERSION_RELEASE = 11;
CEF_SUPPORTED_VERSION_RELEASE = 12;
CEF_SUPPORTED_VERSION_BUILD = 0;
CEF_CHROMEELF_VERSION_MAJOR = 103;
CEF_CHROMEELF_VERSION_MINOR = 0;
CEF_CHROMEELF_VERSION_RELEASE = 5060;
CEF_CHROMEELF_VERSION_BUILD = 114;
CEF_CHROMEELF_VERSION_BUILD = 134;
{$IFDEF MSWINDOWS}
LIBCEF_DLL = 'libcef.dll';
@ -1443,7 +1443,7 @@ begin
RenameAndDeleteDir(FCache)
else
if FDeleteCookies then
DeleteCookiesDB(FCache)
DeleteCookiesDB(IncludeTrailingPathDelimiter(FCache) + 'Network')
else
if FDeleteCache then
RenameAndDeleteDir(FCache, True);
@ -1502,14 +1502,23 @@ end;
procedure TCefApplicationCore.MoveCookiesDB(const aSrcDirectory, aDstDirectory : string);
var
TempFiles : TStringList;
TempSrc, TempDst : string;
begin
TempFiles := TStringList.Create;
try
TempFiles.Add('LocalPrefs.json');
MoveFileList(TempFiles, aSrcDirectory, aDstDirectory);
TempSrc := IncludeTrailingPathDelimiter(aSrcDirectory) + 'Network';
TempDst := IncludeTrailingPathDelimiter(aDstDirectory) + 'Network';
TempFiles.Clear;
TempFiles.Add('Cookies');
TempFiles.Add('Cookies-journal');
MoveFileList(TempFiles, aSrcDirectory, aDstDirectory);
MoveFileList(TempFiles, TempSrc, TempDst);
finally
FreeAndNil(TempFiles);
end;
@ -1533,7 +1542,7 @@ begin
repeat
inc(i);
TempNewDir := TempOldDir + '(' + inttostr(i) + ')';
TempNewDir := TempOldDir + '_' + inttostr(i);
until not(DirectoryExists(TempNewDir));
if RenameFile(TempOldDir, TempNewDir) then