本文整理自网络,侵删。
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 构建时间 -encodedatetime … tryencodedatetime
Delphi 10.3 调试程序时出错:unable to create process:请求的操作需要提升
winapi 字符及字符串函数(15): charnext、charprev
Delphi利用微软sapi实现语音控制(Delphi,tts,sr,灰色代码)_
更多相关阅读请进入《Delphi》频道 >>