Discussion :

[Nicodemus]

Bonjour

J'ai réalisé un petit client-serveur avec Indy qui fonctionne plutôt bien. J'utilise bien évidemment les TIdTCPCLient et TIdTCPServer. J'ai mis en place des CommandHandler côté serveur : lorsque le client envoie une commande, le serveur lance le CommandHandler et accuse réception de la commande au client.

Je sais comment envoyer un fichier du client vers le serveur, en utilisant ceci :

Code :

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

1
2
3
OpenWriteBuffer;
WriteStream(memstream);
CloseWriteBuffer;

Et j'arrive réceptionner le fichier côté serveur.

Maintenant le problème : j'aimerais mettre en place un CommandHandler qui envoie un fichier au client.
En gros le client dit : "je veux un fichier"
Le serveur receptionne le message et remarque que c'est un CommandHandler, il lance la fonction OnCommand définie pour ce CommandHandler. Et cette fonction envoie un fichier au client.

Mais voilà, le composant TIdTCPServer ne possède pas les fontions OpenWriteBuffer, WriteStream, CloseWriteBuffer.

Il m'est venu à l'idée de rajouter un composant TIdTCPClient côté serveur et un composant TIdTCPServer côté client pour faire ce transfert, mais dans ce cas là .. ce ne sera plus vraiment une architecture client-serveur mais peer to peer lol

Comment faire donc ?
Merci

[Nicodemus]

Personne n'a d'idée ? J'ai parcouru toute la partie Indy de la FAQ Delphi (j'ai d'ailleurs trouvé plein de petits trucs intéressants au passage lol).
Mais la seule fos où l'on parle de transfert de données, c'est entre client et serveur et non l'inverse (à part les simples messages textes, broadcast etc..)...

snif

[tintin22]

Jete un coup d'oeil sur cet exemple (ScreenThief avec idTCP), on réalise l'inverse à l'aide d'un Timer, ça reste des chaines de caracteres mais à mon avis c'est possible de transferer un fichier.

[Nicodemus]

Merci.

En fait je savais comment faire côté client. Mais côté serveur : TIdTCPServer.Read/Write Stream n'existe pas.

Il fallait faire : ASender.Thread.Connection.ReadStream dans les fonctions CommandHandler

Tout s'explique !

[tintin22]