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
Comment faire une temporisation sous Delphi ?
Bonjour,
j'aurais besoin que vous me guidé. J'ai besoin de scruter un répertoire en permanence et de lancer un traitement dès qu'on ajoute un fichier dans ce répertoire en attendant que le fichier soit complet bien sur.
Comment faire pour savoir qu'on ajoute un fichier et attendre qu'il soit complètement uploadé dans le dossier ?
Comment faire une temporisation pour que le programme qui scrute le dossier, ne prenne pas toutes les ressources du pc sur lequel il est exécuté ?
Cordialement, David
Bonjour,
Tu peux regarder du coté des sources, ici
http://delphi.developpez.com/sources..._fic_recherche
Cela devrait répondre à tes besoins
La gestion des ressources pour ne pas bloquer l'application est gérée par un thread.
A+
2 solutions :Comment faire une temporisation pour que le programme qui scrute le dossier, ne prenne pas toutes les ressources du pc sur lequel il est exécuté
- Un thread comme proposé par pitango,
- Un Timer à intégrer à la forme à la conception ou à créer dynamiquement et à armer suivant les besoins (myTimer.enabled=true/false)
tu as un composant qui répond pê à une partie de ton pb : http://www.phidels.com/php/index.php...ute.htm&id=225
Delphi 5 Pro - Delphi 12 Athènes Community Edition - CodeTyphon 8.80 sous Windows 10 ; CT 6.40 sous Ubuntu 18.04 (VM)
. Ignorer la FAQ Delphi et les Cours et Tutoriels Delphi nuit gravement à notre code !
pour D6 , dans la palette Example: TShellChangeNotifier
Hello
Il n'y a pas besoin de temporisation pour surveiller le répertoire. Il suffit d'utiliser la fonction API FindFirstChangeNotification.
peut tu donner un exemple ou deux sur son utilisation stp ?Envoyé par DOLPat®
j'ai été sur msdn mais je n'arrive jamais à utiliser une api décrite en langage delph; ce serait pour moi un modèle
Pour un exemple...
Fichiers et répertoires
Yan.
Une Surveillance d'un Dossier, tient ICI j'ai proposé un extrait de code similaire avec TThread, FindFirstChangeNotification, WaitForSingleObject, TCriticalSection et Synchronize ... un peu de tout pour la figure de style
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