pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-02 21:57:37 +02:00
Code Issues Actions Releases Activity

Added some string lenth checks in TCefApplicationCore.AppendSwitch

Browse Source
This commit is contained in:
Salvador Díaz Fau 2020-07-30 11:01:43 +02:00
parent b3b9bf809e
commit 8761ec8749
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

@ -1636,7 +1636,13 @@ begin
aValues.Add(aNewValue); aValues.Add(aNewValue);
end end
else else
aValues[i] := aValues[i] + ',' + aNewValue; if (length(aNewValue) > 0) then
begin
if (length(aValues[i]) > 0) then
aValues[i] := aValues[i] + ',' + aNewValue
else
aValues[i] := aNewValue;
end;
end; end;
procedure TCefApplicationCore.ReplaceSwitch(var aKeys, aValues : TStringList; const aNewKey, aNewValue : ustring); procedure TCefApplicationCore.ReplaceSwitch(var aKeys, aValues : TStringList; const aNewKey, aNewValue : ustring);

2
update_CEF4Delphi.json
View File

@ -2,7 +2,7 @@
"UpdateLazPackages" : [ "UpdateLazPackages" : [
{ {
"ForceNotify" : true, "ForceNotify" : true,
"InternalVersion" : 171, "InternalVersion" : 172,
"Name" : "cef4delphi_lazarus.lpk", "Name" : "cef4delphi_lazarus.lpk",
"Version" : "84.3.8.0" "Version" : "84.3.8.0"
} }