socket传输文件时如何将分割后的文件合起来？

Question

如果是用UDP接收数据流
var
  RsltStream,TmpStream:TMemoryStream;
.
.
.
begin
  RsltStream:=TMemoryStream.Create;
  TmpStream:=TMemoryStream.Create;
.
.
.procedure TServer.UDPDataReceived(Sender: TComponent;
  NumberBytes: Integer; FromIP: String);
begin
.
.
.
  UDP.ReadStream(TmpStream);
  RsltStream.CopyFrom(TmpStream,NumberBytes);
在此处每当UDP收到数据后RsltStream就在原来的数据后加新数据，最后接收完成时RsltStream就是你收到的那个文件，然后你想怎么处理都行了。
.
.
.end;

Answer 1

谢thunderbolt(雷霆霹雳)
 　我现在想用socket直接实现。由于udp是被socket封装起来的，它里面如何实现的还是不清楚——是否同样可以用copyfrom()来实现呢？有哪位对流（或文件流）比较熟悉的朋友可以给我一个实例。
   加给thunderbolt(雷霆霹雳)10分吧

Answer 2

你干嘛不用sendbuf呢？用buf的话，写入文件的时候也会简单些（BlockWrite）。