delphi TIdHTTP Post亂碼問題

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

1. 發過去的是亂碼以下處理, 服務器採用的是UFT-8編碼的狀況下

uses  HTTPApp;

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

 

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

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

idhttp.Post(ConnectUrl,sends,ResponseStream);