如何把通过流方式传输过来的文件存储到文件中(50分)

如何把通过流方式传输过来的文件存储到文件中，请告诉我以后的代码怎么写
传输的文件为任意类型
leng:=client.socket.ReceiveLength(); //读出包长度
socket.ReceiveBuf(buffer,leng); //接收数据包并读入缓冲区内
m.Write(buffer,leng); //追加入流M中
if m.Size>=xxx then //如果流长度大于需接收的字节数，则接收完毕,将M内容存为文件

try
stream:=TFileStream.Create('filename',fmCreate);
stream.copyfrom(m);
finally
stream.free;
end;

接受答案了.