uses IdHTTP; const Url = 'http://del.cnblogs.com'; procedure TForm1.Button1Click(Sender: TObject); var stream: TStringStream; idHttpObj: TIdHTTP; begin stream := TStringStream.Create('', TEncoding.UTF8); // idHttpObj := TIdHTTP.Create(nil); idHttpObj.Get(Url, stream); idHttpObj.Free; Memo1.Text := stream.DataString; stream.Free; end;
使用 idHTTP 获取 UTF-8 编码的中文网页 - 回复同学 "Delphi学习者" 的问题
最新推荐文章于 2022-10-01 20:07:44 发布