delphi TIdHTTP Post亂碼問題

這里主要說的是中文亂碼的問題

1. 發過去的是亂碼如下處理, 服務器采用的是UFT-8編碼的情況下

uses  HTTPApp;

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

 

2. 返回的是亂碼如下處理

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

idhttp.Post(ConnectUrl,sends,ResponseStream);