本文整理自网络，侵删。
Delphi XE2 IDHTTP 获取UTF-8编码中文网页
procedure TForm1.SpeedButton1Click(Sender: TObject);
Var
cText:TstringStream;
idHttp1:TIDHTTP;
begin
cText:=TStringStream.Create('',TEncoding.UTF8);
idHttp1:=TIDHTTP.Create(nil);
idHttp1.Get('http://www.3464.com/Default.htm,cText);
idHttp1.Free;
Memo1.Text:=cText.DataString;
cText.Free;
end;
相关阅读 >>
Delphi firedac压缩和修复ms access数据库
Delphi vcl 的 tpagecontrol 控件，实现对页签的拖动
Delphi 全局变量 hinstance 到底是在什么时候赋值的?
更多相关阅读请进入《Delphi》频道 >>
