Bonsoir a tous. Voila, je developpe une petite appli client serveur sous delphi et j'utilise 2 composant Indy 10 sur ma fiche pour la com (un TIdCmdTcpServer et un TIdCmdTcpClient).
Je voudrais envoyer du texte du client -> serveur et j'utilise cette methode :

coté client :
procedure tform1.envoyer_texte(texte:string);
begin
  try
    tcpclient1.Connect;
    tcpclient1.IOHandler.WriteLn(texte);
    tcpclient1.Disconnect();
  except
      on e: exception do
      begin
      tcpclient1.Disconnect();
      messagebox(handle,pchar(e.Message),'Erreur',MB_ICONEXCLAMATION);
      end;
  end;
end;


coté serveur :
procedure TForm1.TCPServer1Execute(AContext: TIdContext);
begin
form1.caption:=acontext.Connection.IOHandler.ReadLn();
end;

le probleme est que du coté client, je me connecte bien au serveur (les ports et le host sont ok). Mais la procedure TForm1.TCPServer1Execute n'est jamais appelée car j'ai essayé de metre un breakpoint dessus et ca ne s'arrete pas....et ma question est : pourquoi ca marche pas et surtout... comment faire pour que ca marche ? ;o)
Merci d'avance pour vos réponses et @+