本文整理自网络,侵删。
function TThreadSpider.GetHtml(url: string): string;
var
html: string;
begin
try
html := Fhttp.Get(url);
except
html := '';
end;
Result := html;
end;
相关阅读 >>
Delphi xe 新功能试用:多种皮肤样式静、动态设置方法
Delphi winapi: settimer、killtimer - 创建与移除高性能定时器
更多相关阅读请进入《Delphi》频道 >>