Q: 如何將串流資料存到檔案?
A: 使用TFileStream.

  TFileStream *ZipFile;

  ZipFile = new TFileStream("ZipFileName.zip", fmShareExclusive);
  ZipFile->CopyFrom(ZipStream, 0);
  ZipFile->Free();