Ce source donne un exemple d'utilisation de transfert de fichier en utilisant TClientSocket et TServerSocket. C'est aussi un exemple de lecture/écriture dans des fichiers par BlockRead et BlockWrite.
Il peut être utilisé par les possesseurs de Delphi édition personnelle ne disposant pas de la palette FastNet.
Utilisation :
Lancer sur l'ordinateur devant recevoir le fichier et clicquer sur 'ouvrir'. Le PC est alors pret à recevoir de(s) fichier(s).
Sur un autre poste lancer le programme et renseigner l'adresse du poste serveur. Ensuite cliquer sur le bonton envoyer pour choisir le fichier à envoyer. Le fichier sélectionné sera stocké sur le serveur dans le même répertoire que l'application.
Limitations
- Le serveur ne peut recevoir ( pour l'instant ) qu'un seul fichier à la fois.
Evolutions
30/06/2002 : Création
Cette version n'est qu'un version beta, il reste alors beaucoup de cas provoquant des erreurs.
08/07/2002 : Mise à jour des commentaires dans le source
Source / Exemple :
// Voir ZIP
Conclusion :
Je compte améliorer ce programme pour le rendre plus facile à utiliser et plus complet, donc si vous avez des idées ou/et des commentaires...
Merci à djtexas pour la liste des erreurs Socket
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.