在下载之前,如何使用Delphi确定Web中托管的远程文件的大小(以字节为单位)?
提前致谢.
解决方法
你可以使用Indy.
首先包括IdHTTP.
您可以通过这种方式检索大小:
procedure TFormMain.Button1Click(Sender: TObject); var Http: TIdHTTP; begin Http := TIdHTTP.Create(nil); try Http.Head('http://live.sysinternals.com/ADExplorer.exe'); ShowMessage(IntToStr(Http.Response.ContentLength)); finally Http.Free; end; end;