delphi - 如何在 Delphi 中使用大文件？

Question

当我在内存流或文件流中使用大文件时，我看到“内存不足”错误我该如何解决这个问题？

示例:

procedure button1.clıck(click);
var
  mem:TMemoryStream;
  str:string;
begin
  mem:=Tmemorystream.create;
  mem.loadfromfile('test.txt');----------> there test.txt size 1 gb..
  compressstream(mem);
end;

Answer 1

你的实现非常困惑。我不知道 CompressStream 到底是做什么的，但是如果您想将大文件作为流处理，您可以通过简单地使用 TFileStream 来节省内存，而不是尝试一次将整个文件读入 TMemoryStream 。

此外，当您使用完 TMemoryStream 后，您永远不会释放它，这意味着您将泄漏大量内存。 (除非 CompressStream 能够解决这个问题，但是从代码中并不清楚，这样编写确实不是一个好主意。)