delphi idhttp post 普通提交乱码处理


本文整理自网络,侵删。

 

var
  IdHTTP1:TIdHTTP;
  postStream : TStringStream;
  Wstr:WideString;<br><br>res:WideString;
begin
 
 IdHTTP1 := TidHTTp.create(nil);
     try
        Wstr:= 'aaccount=' + aaccount;
        Wstr:=Wstr+'&'+'passwd=' +passwd;
  postStream:=TStringStream.Create(ansitoUTF8(Wstr));
        IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded';
 
      try
         res:=Utf8ToAnsi(IdHTTP1.Post(infoURl,postStream));
      except
       on E:Exception do
       begin
          MsgBox('错误信息:' +e.message);
       end;
      end;
        vJson := SO(res);
 
end;
  

用stringlistPOST提交时会乱码,改用该方法后解决。

相关阅读 >>

Delphi xe10 给程序添加uac权限

Delphi android 关闭应用程序对话框询问

Delphi中实现磁盘信息类(tdriveinfo)

Delphi 注册表启动项管理代码

Delphi窗体固定在桌面上

Delphi 写图片格式转换程序大全

Delphi读取一个access数据库中的表名

Delphi中轻松实现tidftp的断点续传

Delphi 病毒

Delphi仿qq窗口抖动的代码

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



打赏

取消

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

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

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

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

评论

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