没理头号，能帮我解决传输记录很大的问题吗？比如大于500条。(0分)

传几十条记录传输正确而却速度很快，但传许多条记录如500条，就会传输错误。
TREC=RECORD
SS：INTEGER；
AA：STRING[10]
...
End
sendSH:array[1..15000] of TREC;
recesh:array[1..15000] of Trec;
st:=Tmemorystream;

st:=Tmemorystream.creat;
st.write(sendsh,sizeof(TREC)*recno);//recno是改变了记录的条数，动态在变
serversocket1.socket.connections[0].sendstream(st)

clientsocket1.socket.recebuff(recesh,sizeof(TREC)*recno); //recno
//通过serversocket2发送过来
请帮我改一下上面的程序。

socket 不是很熟﹐我猜是不是數據的 size 超過了 IP 數據包的大小?

如果超过了IP包的大小，该怎么处理？IP包大小是4K吗？

据说用indy没问题。