delphi 入门之《获取网页的内容》

delphi获取网页的内容使用 IdHTTP 请求网页的地址，然后获取返回的响应内容，使用方法：

uses IdHTTP;

function Tprint_MainForm.GetWebPageResponse(Url :string; isUtf8 :Boolean = true):string;
var
http :TIdHTTP;
begin

try

Result := ''; http:= TIdHTTP.Create(Application); Result := http.Get(Url); if isUtf8 then Result := Utf8ToAnsi(Result); finally FreeAndNil(http); end; end;end.