pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-08-04 21:32:54 +02:00
Code Issues Actions Releases Activity

Removed TChromiumCore.AcceptLanguageList

Browse Source 
Chromium ignores changes to the intl.accept_languages browser preference.

Alternatives :
- Use GlobalCEFApp.AcceptLanguageList.
- Use TChromiumCore.SetUserAgentOverride and set the aAcceptLanguage parameter.
- Create a custom request context with TCefRequestContextRef.New and set the aAcceptLanguageList parameter.
This commit is contained in:
Salvador Díaz Fau
2025-07-25 16:47:42 +02:00
parent b700253103
commit 58fbd83d30
6 changed files with 799 additions and 901 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
source/uCEFChromiumCore.pas
View File

@ -107,7 +107,6 @@ type
FWebRTCIPHandlingPolicy : TCefWebRTCHandlingPolicy;
FWebRTCMultipleRoutes : TCefState;
FWebRTCNonProxiedUDP : TCefState;
FAcceptLanguageList : ustring;
FAcceptCookies : TCefCookiePref;
FBlock3rdPartyCookies : boolean;
FQuicAllowed : boolean;
@ -430,7 +429,6 @@ type
procedure SetOffline(aValue : boolean);
procedure SetYouTubeRestrict(aValue : integer);
procedure SetPrintingEnabled(aValue : boolean);
procedure SetAcceptLanguageList(const aValue : ustring);
procedure SetAcceptCookies(const aValue : TCefCookiePref);
procedure SetBlock3rdPartyCookies(const aValue : boolean);
procedure SetMultiBrowserMode(aValue : boolean);
@ -2105,10 +2103,6 @@ type
/// </summary>
property PrintingEnabled : boolean read FPrintingEnabled write SetPrintingEnabled;
/// <summary>
/// Set the accept language list in the browser preferences.
/// </summary>
property AcceptLanguageList : ustring read FAcceptLanguageList write SetAcceptLanguageList;
/// <summary>
/// Sets the cookies policy value in the browser preferences.
/// </summary>
property AcceptCookies : TCefCookiePref read FAcceptCookies write SetAcceptCookies;
@ -4308,7 +4302,6 @@ begin
FSafeSearch := False;
FYouTubeRestrict := YOUTUBE_RESTRICT_OFF;
FPrintingEnabled := True;
FAcceptLanguageList := '';
FAcceptCookies := cpAllow;
FBlock3rdPartyCookies := False;
FOffline := False;
@ -6562,15 +6555,6 @@ begin
end;
end;
procedure TChromiumCore.SetAcceptLanguageList(const aValue : ustring);
begin
if (FAcceptLanguageList <> aValue) then
begin
FAcceptLanguageList := aValue;
FUpdatePreferences := True;
end;
end;
procedure TChromiumCore.SetAcceptCookies(const aValue : TCefCookiePref);
begin
if (FAcceptCookies <> aValue) then
@ -7504,8 +7488,6 @@ begin
end;
procedure TChromiumCore.doUpdatePreferences(const aBrowser: ICefBrowser);
var
TempLanguagesList : ustring;
begin
FUpdatePreferences := False;
@ -7522,16 +7504,6 @@ begin
UpdatePreference(aBrowser, 'settings.force_youtube_restrict', FYouTubeRestrict);
UpdatePreference(aBrowser, 'printing.enabled', FPrintingEnabled);
TempLanguagesList := FAcceptLanguageList;
if (length(TempLanguagesList) = 0) then
TempLanguagesList := GlobalCEFApp.AcceptLanguageList;
if (length(TempLanguagesList) = 0) then
TempLanguagesList := 'en-US,en';
UpdatePreference(aBrowser, 'intl.accept_languages', TempLanguagesList);
case FAcceptCookies of
cpAllow : UpdatePreference(aBrowser, 'profile.default_content_setting_values.cookies', CEF_COOKIE_PREF_ALLOW);
cpBlock : UpdatePreference(aBrowser, 'profile.default_content_setting_values.cookies', CEF_COOKIE_PREF_BLOCK);