Delphi 的 TStringBuilder 可以完美实现Jave ,C#的TStringBuilder功能


本文整理自网络,侵删。

 
function T_SunnySky_SDK.JoinItems(AParamDic: TDictionary<string, string>): string;
var
  sb : TStringBuilder;
  key :  TPair<string,string>;
begin
   if not Assigned(AParamDic)  then
      Result := ''
   else if AParamDic.Count = 0  then
      Result := ''
   else begin
         sb := TStringBuilder.Create;
         try
             for key in AParamDic do
             begin
                 if sb.Length > 0  then
                   sb.Append('&');
 
                 sb.Append(key.Key);
                 sb.Append('=');
                 sb.Append(HTTPEncode(key.Value));
             end;
 
             Result := sb.ToString;
         finally
            sb.Free;
         end;
   end;
end;

来源:https://www.cnblogs.com/starluck/p/10795147.html

相关阅读 >>

Delphi实现电脑桌面壁纸更换

Delphixe ansi字符串utf-8编码判断

Delphi code无法回车换行

Delphi application.processmessage作用

Delphi sql server备份脚本

Delphi 判断是否是系统管理员身份

Delphi vcl图像的二值化

Delphi 获取当天是星期几,计算两个日期相隔时间

Delphi xe5 android程序常用的unit

winapi 字符及字符串函数(2): charlowerbuff - 把缓冲区中指定数目的字符转小写

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...