コラァッ！！ ぼーらんどぉっ！！

以下、C++Builder6付属の開発者ガイド「C++Builder を使ったプログラミング」サービスアプリケーションの章より引用

void __fastcall TService1::ServerSocket1ClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
  char *Buffer = NULL;
  int len = Socket->ReceiveLength();
  while (len > 0)
  {
    try
    {
      Buffer = (char *)malloc(len);
      Socket->ReceiveBuf((void *)Buffer, len);
      Stream->Write(Buffer, len);
    }
    __finally
    {
      free(Buffer);
    }
    Stream->Seek(0, soFromBeginning);

    AnsiString LogFile = "C:\\Temp\\WebLog";
    LogFile = LogFile + IntToStr(ServiceThread->ThreadID) + ".log";
    Stream->SaveToFile(LogFile);
  }
}

ちゃんと動作確認しやがれっ！！

サンプルプログラムにバグ仕込むな。