Problème d'envoie de text avec les sockets
J'utilise les composants Tclientsocket et Tserversocket pour mon tchat
J'ai décidé de créer une option pour transféré des textes, mais j'ai un prob :
lorsque le texte est petit, tout est niquel le client le reçoit bien, mais lorsqu'il est trop long et bien ça plante et je ne reçoit pas tout :/
l'envoie (du server au client) :
Code:
ServerSocket1.Socket.Connections[0].SendText('3'+memo1.Text);
la réception (dans le client) :
Code:
1
2
3
4
5
6
7
8
|
var
st,st2: string;
if (st[1]='3') then
begin
memo1.Text := st2;
end; |
donc pour les petit texte (qui se trouve dans le memo1 du server) ça passe facile (le client rçoit tout)
mais lorsque le texte est trop grand on ne reçoit pas :/
donc la question est : comment faire en sorte que tout le texte arrive dans le memo1 du client
merci d'avance :)
