diff --git a/source/uCEFApplicationCore.pas b/source/uCEFApplicationCore.pas index 28f23c17..bf74122f 100644 --- a/source/uCEFApplicationCore.pas +++ b/source/uCEFApplicationCore.pas @@ -1636,7 +1636,13 @@ begin aValues.Add(aNewValue); end 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; procedure TCefApplicationCore.ReplaceSwitch(var aKeys, aValues : TStringList; const aNewKey, aNewValue : ustring); diff --git a/update_CEF4Delphi.json b/update_CEF4Delphi.json index 2982c3f7..2b7e84f9 100644 --- a/update_CEF4Delphi.json +++ b/update_CEF4Delphi.json @@ -2,7 +2,7 @@ "UpdateLazPackages" : [ { "ForceNotify" : true, - "InternalVersion" : 171, + "InternalVersion" : 172, "Name" : "cef4delphi_lazarus.lpk", "Version" : "84.3.8.0" }