如何在DELPHI中编程下载网站文件???(20分)

如何在DELPHI中编程下载网站文件??? 例:要下载HTTP://WWW.HZINFO.COM/README.TXT 文件,应如何使用控件或语句下载?

http://www.delphifans.com/down_view.asp?id=430

ShellExecute(handle,'open',pchar(FExeFileName),nil,nil,SW_SHOW)

[DELPHI]网络下载文件
uses UrlMon;

function DownloadFile(Source, Dest: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(source), PChar(Dest), 0, nil) = 0;
except
Result := False;
end;
end;

if DownloadFile('http://www.borland.com/delphi6.zip, 'c:/kylix.zip') then
ShowMessage('Download succesful')
else ShowMessage('Download unsuccesful')

用FastNet中的NMFTP和NMHTTP可以做下载文件。