救急。。。哪位可以帮我转这一句代码啊

Question

  实在是很急。。
  因为用delphi2009里的tIDhttp组件向网页post中文总是不行，别人给了个参考
    var
    s:string;
    begin
    s := ’你好，电脑学习网！’;
    s := Encoding.GetEncoding(’GB2312’).GetBytes(s);
    end;  但上面的是delphi2005里的，也就是net里的， delphi2009里并没有，
  谁能帮我用delphi 里的Tencoding转一下上面那一句代码啊，我delphi实在是不熟,事又有点急, 

Answer 1

  哎，真是烦人，字符码方面不熟。。
  
  还真是郁闷，换成delphi7，同样的代码却可以发送中文，delphi2009就不行，怎么高版本的还不如低版本的

Answer 2

var
  ss : TStringStream;
begin
  ss := TStringStream.Create('', TEncoding.GetEncoding(936)); { 指定gb2312的中文代码页
  try
    IdHTTP1.Get(CSURL, ss);
    IdHTTP1.Get(CSURL);
    Memo1.Text := ss.DataString;
  finally
    ss.Free;
  end;
end;

Answer 3

WebBrowser试下要不就用UrlEncode试下

Answer 4

楼主2009已经支持Unicode啦，所以不需要在转了，直接用试一下