求抓取网页信息最好的方法

Question

我还用隐藏的WebBrowser在获取网页信息。
应该有其他更好的方法吧
我看到有些投票机、注册机、广告机（国外用的，有偿看广告，为了防作弊，每次要问你问题），可以只把网页某部分显示出来，还有邮箱地址抓取器，他们用的什么方法快速大量分析那么多网页的啊？

Answer 1

text:=idhttp.get('http://www.XXX.cn') 
呵呵~比楼上多写一点

Answer 2

直接获取网页源代码：function GetWebPage(const Url: string):string;
var
  Session,
  HttpFile:HINTERNET;
  szSizeBuffer:Pointer;
  dwLengthSizeBuffer:DWord;
  dwReserved:DWord;
  dwFileSize:DWord;
  dwBytesRead:DWord;
  Contents:PChar;
begin
  Session:=InternetOpen('',0,niL,niL,0);
  HttpFile:=InternetOpenUrl(Session,PChar(Url),niL,0,0,0);
  dwLengthSizeBuffer:=1024;
  HttpQueryInfo(HttpFile,5,szSizeBuffer,dwLengthSizeBuffer,dwReserved);
  GetMem(Contents,dwFileSize);
  InternetReadFile(HttpFile,Contents,dwFileSize,dwBytesRead);
  InternetCloseHandle(HttpFile);
  InternetCloseHandle(Session);
  Result:=StrPas(Contents);
  FreeMem(Contents);
end;

Answer 3

var
s:string;
begin
s:=idhttp1.get('www.baidu.com');end;