Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter
Stopper un SendStream [scktcomp.pas]
Bonjours, est t-il possible de stopper l'envoi d'un fichier par la procedure SendStream du composant ScktComp ?
Si non , quelqu'un aurrait il une equivalence de la fonction SendStream pour envoyer un TMemoryStream , ou tout simplement le code de la fonction SendStream .
Merci.
Tu écris ta propre classe de TStream et dans le Read tu gère un flag genre Enabled, si True, lecture normale, si False, ne lit rien et renvoi Zéro, la fonction SendStream pensera que ton stream est fini (c'est une lecture en boucle par paquet de 4Mo), et donc le transfert s'arrêtera ... une fois SendStream terminé, le Stream passé en paramètre est libéré ! ne pas oublier cela !
une solution, plus moche, tu mets le SendStream dans un thread et tu kill le thread voire tu fermes la connexion ... attention au violation d'accès ... audrait tester pour la libération de l'objet Stream, normalement SendStream le fait mais en cas d'exception, je ne pense pas ... c'est une méthode à éviter la 1ère en ce base sur la surchage de Read est à mon avis la plus adéquate ...
Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
Attention Troll Méchant !
"Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
L'ignorance n'excuse pas la médiocrité !
L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
Il faut avoir le courage de se tromper et d'apprendre de ses erreurs
Répondre avec citation
Partager