如何使用Delphi的TIdHTTP组件高效下载超大文件？

本文共计261个文字，预计阅读时间需要2分钟。

我使用以下代码段下载小文件：`Var ms: TMemoryStream; begin ms :=TMemoryStream.Create; Idhttp1.Get('http://mydomain.com/myfile.zip', ms); ms.SaveToFile('myfile.zip'); ms.Free; end;` 但文件在存储到硬盘前先保存在RAM中，因此可以更快地处理。

我用这段代码下载小文件：

Var ms:TMemoryStream; begin ms:=TMemoryStream.Create; Idmydomain.com/myfile.zip',ms); ms.SaveToFile('myfile.zip'); ms.Free; end;

但是文件在存储到磁盘之前保存在RAM中,因此可能难以下载文件> 1Gb,例如.有没有办法按部件下载文件？或者我需要使用WinInet吗？提前致谢！

TMemoryStream提供内存缓冲区,因此如果您下载到一个缓冲区,则需要有足够的内存来容纳您收到的所有内容.但它并不是唯一的流.您可以将Get方法传递给所需的任何类型的流,包括在收到它时将其内容写入磁盘的流.例如,使用TFileStream.

var s: TStream; s := TFileStream.Create('myfile.zip', fmCreate); try IdHttp1.Get(..., s); finally s.Free; end;

无论您在TMemoryStream上调用LoadFromFile还是SaveToFile,TFileStream都可能是更好的选择.