delphi TIdHTTP Post乱码问题

这里主要说的是中文乱码的问题

1. 发过去的是乱码如下处理, 服务器采用的是UFT-8编码的情况下

uses  HTTPApp;

     sPost := HTTPEncode(UTF8Encode('中文处理'));

 

2. 返回的是乱码如下处理

ResponseStream:=TStringstream.Create('',TEncoding.UTF8);

idhttp.Post(ConnectUrl,sends,ResponseStream);