如何用indy的idhttp实现下载网络上的文件,是下载zip 或者exe文件,如何保存?(200分)

  • 主题发起人 主题发起人 cinemaAll
  • 开始时间 开始时间
C

cinemaAll

Unregistered / Unconfirmed
GUEST, unregistred user!
如题,请大家帮忙,急急急!
 
是的,详细的:
procedure DownFile(sName, DName: string);
var
Response: TFileStream;
HttpDown: TIdHTTP;
begin
HttpDown := TIDHttp.Create(nil);
try
HttpDown.Request.ProxyPort := 80;
HttpDown.Request.ContentType := 'application/x-www-form-urlencoded';
Response := TFileStream.Create(DName, fmCreate);
try
HttpDown.Get(sName, response);
finally
Response.Free;
end;
finally
HttpDown.free;
end;
end;
 
非常感谢您的回答,可以留个邮件吗?
接受答案了。
 
后退
顶部