Discussion :

[Jeannot Alpin]

Salut a tous,
J'ai un petit problème avec TClintsocket et TServersocket. Pour l'instant j'essaye de faire un petit chat. J'arrive a envoyer du texte à partir du client jusqu'au serveur mais impossible d'envoyer du texte du serveur au client. Y a t-il une solution a ce probleme ?
Merci d'avance
a++

[LeFlou]

Salut,

J'ai déjà demandé donc je sais à présent
tu places cette ligne de code dans une procédure déclenchée par un bouton "transmettre" par exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ServerSocket1.Socket.Connections[i].SendText('Salut toi !');

la variable i entre crochets étant le numéro du client connecté au serveur auquel tu désires envoyer un message ! il débute à 0 et s'incrémente à mesure que les clients se connectent.

Euh par contre j'ai une question ( ) comment spécifier l'envoi du pseudonyme du programme client, peut-on donner un nom à l'envoi de texte en vue de réagir differement du coté serveur afin qu'il détermine si c'est un message ou si c'est le pseudo qui est envoyé ?

[slimjoe]

Salut a tous,
J'ai un petit problème avec TClintsocket et TServersocket. Pour l'instant j'essaye de faire un petit chat. J'arrive a envoyer du texte à partir du client jusqu'au serveur mais impossible d'envoyer du texte du serveur au client. Y a t-il une solution a ce probleme ?
Merci d'avance
a++

Salut!

Je ne sais pas quelle version de Delphi tu utilises, mais il y a un exemple fourni avec l'IDE qui fait exactement cela. Je possède Delphi 7 et l'exemple est à cet endroit sur mon poste :

C:\Program Files\Borland\Delphi7\Demos\Internet\NetChat

Je t'invite à y jeter un oeil.

Bon dev!

-Slimjoe

[Jeannot Alpin]

Merci a tous les deux! ca marche parfaitement !
a++