Probleme de sendtextRésolu

Question

Salut à tous,

Voila sur un projet j'arrive à envoyer un sendtext d'un client vers un serveur (le message est récupéré sur le serveur par un TEdit). 

Cependant si j'essaye d'envoyer un sendtext du serveur vers le client (avec le meme projet biensur), le serveur se bloque avec un message indiquant un probleme asynchrone lors du sendtext.

Je comprends pas pourquoi

Merci pour le coup de main

f0xi · Accepted Answer

procedure SendText(var ServSock : TServerSocket; index : integer; text : string);

begin

   ServSock.Socket.Connections[index].SendText(text);

end;



et pouf



SendText(ServerSocket1,0,'Wazzzaaaa!');

Francky23012301 · Answer

Il semblerait que la synthaxe à utilisée soit celle la :

ServerSocket1.Socket.Connections[0].SendText(message); 

Alors je me pose une petite question : on peut faire une connection une bonne fois pour toute et utiliser alors une synthaxe plus simple pour le sendtext ??

Merci

f0xi · Answer

Holala, attention j'ai appeler ma procedure SendText, tout comme la procedure existante.



alors attention de ne pas l'appel&#233;e dans un "with ServSock.Socket.Connections[x] do begin"



le mieux serait de l'appel&#233;e _SentText() ou Send_Text() ou encore TextThrow() (ma prefer&#233;e de toute)

Probleme de sendtext

3 réponses

Votre réponse