如何用socket发送大数据包

Question

如题，用socket发送大数据包时，如何定义数据包，以及定义数据包为多大比较合适，
发送数据最大有4w多条记录，如果不压缩有10多M，压缩后有500多K，
本人刚学delphi，请贴点代码看看，谢谢！！！

Answer 1

1 发送数据为文件，用filestream流化，
   定义发送缓存 sendbuf:array [0..1023] of byte;
   filestream.copy一段send一段。 
2 发送数据为内存，直接发送
  copymemory(@sendbuf,@data,len);
  send就可以了。
包一般为1024就可以，包定义最佳尺寸去ibm的网站上看
一般都是这个。
代码手头没，不过网上很多，推荐网站--中国it实验室

Answer 2

>>如题，用socket发送大数据包时，如何定义数据包，以及定义数据包为多大比较合适，
用 indy 的系列socket 控件就可，
放到一个数组中发送