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 xe10 麦克风、摄像头操作

Delphi 常用api 函数

Delphi ascii 码对照表

Delphi 方法的类型

Delphi memo 文本列合并

Delphi screencap 截图

Delphi使用idhttp.get('') 造成假死(堵塞),请问线程idhttp怎么才能做到不出错?

Delphi 从paintbox拷贝一部分内容到tbitmap

Delphi xe 应用程序横竖屏设置

Delphi is 与 as 运算符举例

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



打赏

取消

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

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

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

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

评论

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