Bonjour,
Débutant en Delphi 7, je souhaite réaliser une liaison de type chat entre 2 PC, en utilisant les composants TIdTelnetServer et TIdTelnetClient.
J'ai un memo qui affiche les caractères reçus, et un autre où je tape les caractères à envoyer.
Pour la réception, la ligne de code, dans la procédure Execute est:
memo1.Text:=memo1.Text+athread.Connection.ReadChar;
La réception marche bien, mais pas l'émission, car le programme attend indéfiniment des datas (du moins je crois). Si je supprime cette ligne, l'émission du serveur vers client fonctionne bien.
Comment faire pour attraper les caractères "au vol", vu qu'il n'y a pas d'évènement du genre OnReceiveData ?
Merci d'avance pour votre aide.