Aide INDY Choix du thread lors du WriteLn

cs_Nostaroth Messages postés 13 Date d'inscription mercredi 29 novembre 2006 Statut Membre Dernière intervention 14 mai 2009 - 4 sept. 2007 à 18:08
cs_Nostaroth Messages postés 13 Date d'inscription mercredi 29 novembre 2006 Statut Membre Dernière intervention 14 mai 2009 - 18 sept. 2007 à 20:43
Bonjour! Alors voila, je voudrai realisé un Chat Multi-Client et je voudrai que depuis mon serveur, je puisse selectioné le Thread a qui envoyé le message, seulement deja quand j'envoi mon message a tout les Client, les clients ne reçoivent rien:

Serveur:

procedure TForm1.Button4Click(Sender: TObject);
var List: TList;
i:Integer;
begin
List:= Server.Threads.LockList;
For i:=0 to pred(List.Count) do
Server.Threads.UnlockList;
List.Free;
end;

Client(Cette procedure est placée OnWork):

procedure TForm1.ClientWork(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
Edit1.Text:=Client.ReadLn();
end;

end.

Ou est mon erreur?

Et.... en passant, si a la place de i je met le numero du Client (par exemple 1 si je veu parlé au premier client connecté) la methode est-elle bonne? Merci beaucoup de vos reponse

1 réponse

cs_Nostaroth Messages postés 13 Date d'inscription mercredi 29 novembre 2006 Statut Membre Dernière intervention 14 mai 2009
18 sept. 2007 à 20:43
Merci de votre aide...
0
Rejoignez-nous