Discussion :

[prgasp77]

Bonjour,
je tente d'écrire une application ayant plusieurs instances, discutant entre elles via un serveur et le protocole TCP. Le soucis est que la documentation Delphi est quasi-inexistante sur le sujet.

Voici où j'en suis :
Coté Serveur

Code :

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

1
2
3
4
5
6
ClientSocket := TCustomIpClient.Create(nil);
ServerSocketThread.ServerSocket.Accept(ClientSocket);
[...]
request := ClientSocket.Receiveln(#0);
[...]
ClientSocket.Sendln(result + #0, #0);

Coté Clients

Code :

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

1
2
3
4
TcpClient.Open;
TcpClient.Sendln(#1+'login' + #0, #0);
ShowMessage(TcpClient.Receiveln(#0));
TcpClient.Close;

Au final, le serveur reçoit bien le #1 + 'login', mais la réponse (result) n'est pas reçue par le client. Comment ce fait-ce ?

NB : je suis sous Delphi7,
Merci pour votre aide.

[korntex5]

ton problème est peut être une mauvaise configuration des numéro de port.
Tu devrais t'interresser aux composants INDY, il y a beaucoup d'exemples sur le net