对tmemorystream的一些改进_delphi教程

procedure TExeExporter.CreateExecutableFile(const AFileName:String;const AStream:TMemoryStreamEx);

begin

AStream.AppendToFile(AFileName);

end;

就那么简单，速度也缩短到仅仅2－3秒了。

最近单位做的一系列软件也在进行提速优化，使用了好多方法，自己管理内存（减少malloc的调用次数），使用HashTable存放经常要进行查找的数据。。。。等等，看到自己研发的软件在速度上有了质的飞跃，实在是非常有成就感啊。