Discussion :

[cedm78]

Je cherche à faire un petit jeu multiposte en delphi. J'ai d'une part une appli serveur avec un TSocketServer qui attend les clients et qui dispach les infos d'un client vers les autres !
De l'autre part j'ai des Clients (avec un SocketClient) qui recoit toutes les infos du serveur et qui les affiche ! Le client doit pouvoir envoyer des info au serveur !


QUESTIONS :

- Est il possible d'envoyer du texte du serveur vers tous les clients en une seule fois ?

- J'ai essayé de mettre un bouton sur la form Server avec comme code :
ServerSocket1.Socket.SendText(Edit1.text);
Est ce correcte car à l'éxécution il me fais une erreur lorsque j'essaie d'envoyer le texte .
WindowsSocket error (10057) on API 'send'

HELP ???

[Cyspak]

QUESTION 1: Non
QUESTION 2: WindowsSocket error 10057 = Error WSAENOTCONN =
Socket is not connected. Il faut ouvrir la connexion d'abord

[Tardivel Yannis]

ça peut etre possible avec les specifications tcp/ip

car faut envoyer a l'adresse : 192.168.0.255
je c plus comment cela s'appelle mais en fait
suivant ton reseau :
classe a : x.255.255.255
classe b : x.x.255.255
classe c : x.x.x.255

cela envoie le message sur tout le reseau

[cedm78]

Ok ok mais justement ma connection est ouverte ! Je sais envoyer du texte du server au client mais je ne sais pas pourquoi, dès que je ne suis plus dans un évenement du socket server cela ne marche plus !

[cedm78]

voilà deux extrait de code de mon prog !
dans le TForm1.ServerSocket1ClientRead, la commande sendtext fonctionnne sans problème mais ds le code du bouton, ca plante !
Pourquoi ??? je ne ferme pourtant pas le socket entre les 2 opérations !
Se fermerait il tout seul ???


procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
// read from the client
lastmessage := Socket.ReceiveText ;
lbMsg.Items.Add(Socket.RemoteHost + ': ' + lastmessage);
Socket.SendText('recu' + lastmessage) ;
end;

procedure TForm1.BtnSendClick(Sender: TObject);
begin
ServerSocket1.Socket.SendText('Test');
end;

[cedm78]

J'ai trouvé !

c'est pas
ServerSocket1.Socket.SendText('test');

mais

ServerSocket1.Socket.Connections[0].SendText('test');

0 étant l'index du client connecté auquel on envoi !

[LokiOm]

merci à qui ?!?

et arrête de jouer...

[cedm78]

ce coup là j'ai trouvé dans un exemple !
Mais tu m'avais mis sur la voie !!!