包头(为字符信息)+包体(为文件流)如何组包发送?server和client都用TWinSocketStream实现

我说的详细点.单独的分包发送文件流和分包发送字符信息,我都已经实现.现在的想法是:多包发送,包结构是:包头中存储这个包的相关信息,内容当然是字符了,包体存放的是分割好的文件流.问题是:不知道如何把包头和包体组合在一个包中发送出去.希望朋友们给点思路啊!都烦躁几天了.先谢谢各位了!!!ps:本人使用Tserversocket和Tclientsocket,都为阻塞方式,使用TwinsocketStream.read/write