[IdTCP] Comment tester l'existence de messages en attente ?
Bonjour a vous.
J'ai realisé pour me etude un projet sou linux en Objective Caml, qui consitait grossierement en ceci :
Le Serveur, qui calcule des mises a jour de son etat en permanence, et dès qu'il recois une demande, envois au client l'etat en question.
Le Client, qui envois la requette de mise a jour, et affiche l'etat recu.
Le probleme qui se pose quand je tente de coder ca en Delphi, c que la fonction de reception des requetes est bloquante :
Code:
1
2
3
4
5
|
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
begin
AThread.Connection.ReadLn(...);
end; |
Par consequent, l'application serveur ne continu pas a calculer lorsqu'elle ne recois rien.
Existe t-il une fonction non bloquante qui permet de tester l'existance d'un message envoyer par le client ?
Ou peut-etre une fonction qui recupere le message du client, et si il n'y en a pas, leve une exception a recuperer.
Merci a vous
