如何下载文件到本机？(急！！)(40分)

我想实现从一个网站上下载一个文件(如：http://51zk.csai.cn/ggl/kc.xml)到本机，
然后对其进行操作，该怎么样做呢？

webbrowers

在论坛搜索下，应该有这方面的资料

idhttp.get()
那个地址就行了。
function K_Tmain.DownLoadFile(sURL, sFName: string): boolean;
var //下载文件
idHttp:Tidhttp;
tStream: TMemoryStream;
i:integer;
begin
tStream := TMemoryStream.Create;
idhttp := Tidhttp.create(nil);
try //防止不可预料错误发生
try
IdHTTP.Get(sURL, tStream); //保存到内存流
i:=tStream.Size;
if i>0 then
begin
tStream.SaveToFile(sFName); //保存为文件
Result := True;
end
else
begin
downloadfile(surl,sfname,idhttp);
end;
finally //即使发生不可预料的错误也可以释放资源
tStream.Free;
freeandnil(idhttp);
end;
except //真的发生错误执行的代码
Result := False;
tStream.Free;
end;

引用这个,用流，保存网上的xml是正确的，如果不用流,只用get,保存下来的只是显示出来，信息不准确`

接分啊。。

多人接受答案了。