求原码,serversocket,clientsocket的简单例程(100分)

clientsocket从硬盘上读一个bmp(用TBitMap)出来,读到一个TMemoryStream中去,
用clientsocket的sendbuffer或者sendstream发,用serversocket收,读到一个
TMemoryStream中去,然后用一个TBitMap写到磁盘上,就这么简单.

我郁闷的是我接受完Stream后和源stream大小完全一致,但用MyBitMap.LoadFromStream
的时候,总是提示我is not valid bitmap,我检查了,发的时候的stream读出来没有问题.
可见还是我的发送接受不对.

给我发到icewolf_little@sina.com,100分送上.
在这里贴出来也行,但要验证过的

我发了一份给你

帮你UP！

up