Dev Faq
9
votes

NOTIFICATION DELPHI Lorsqu'un fichier est mis à jour

Mon application contient des documents dans sa base de données. Les utilisateurs peuvent ouvrir les documents dans ce cas, le document est enregistré dans un dossier temporaire et s'ouvre sur l'ordinateur de l'utilisateur.

J'aimerais avoir une notification lorsque l'un de ces fichiers temporaires est modifié et offrez à l'utilisateur de sauvegarder le document modifié à la base de données.

Quel est le moyen le plus simple de le faire à Delphi7? (Je suppose qu'il nécessite une composante magique Shell ou 3ème partie)

Merci!

1 commentaires

Où sont chargés les documents? Trichedit? TMEMO?

4 Réponses :

9
votes

Vous pouvez détecter les modifications de vos fichiers temporaires (ou tout fichier) à l'aide du < Code> TJVChangenotify composant à partir du Collection Jedi JVCl .

1 commentaires

Je préfère ne pas utiliser de composants JVCl depuis que je les ai trouvés comme une buggy. Ne pas parler d'avoir à installer des composants de Gazilion juste pour avoir celui que vous avez réellement besoin ...

8
votes

Vous pouvez soit:

  1. Utilisez l'API SHCHANGENOTIFYregister fonction pour surveiller changements dans le dossier Temp, puis vérifiez votre chèque de rappel si vos fichiers temporaires déclarent des modifications.

  2. Depuis que vous connaissez le (s) fichier (s) exact (s) qui vous intéresse, vous pouvez surveiller manuellement les surveiller directement les modifications apportées à leurs tailles et à des horodatages à l'aide de FindFirstFile dans une minuterie ou un fil.

0 commentaires
5
votes

En plus de ce que rruz et Remy Lebeau a écrit:

Notez que tjvchangenotify dans l'unité jvChangenotify utilise l'appel FindFirstChangenotification API; Cette est la documentation MSDN. REMARQUE Il est un peu contre-intuitif: voir le fil mentionné ci-dessous sur la façon de l'utiliser à l'intérieur d'une boucle tandis que.

Il y a aussi l'appel ReadDirectoryChanges API, qui n'est pas enveloppé par le JCL / JVCL , et possède MSDN Documentation ici < / a> et il y a un Exemple de Delphi Win32 < / a> aussi.

Ce fil explique les différences entre le deux appels d'API.

- Jeroen

1 commentaires

Merci pour l'info, allez les vérifier aussi.

2
votes

Jetez également un coup d'œil à ceci: http://www.cromis.net / Blog / Downloads / Directory-Watch / et Comment surveiller le répertoire des fichiers de Delphi Xe?

1 commentaires

Veuillez noter qu'il y a un bogue dans cette bibliothèque. Vous devez ajouter terminer dans tdirwatththread.execute (après SignalError (errorormsage)) - sans cela entre dans une boucle infinie lorsque vous supprimez tous les fichiers du dossier, puis le dossier lui-même! Étapes pour reproduire ce bogue: créer un dossier, un dossier de surveillance, mettre des fichiers dans le dossier, supprimer tous les fichiers de dossier, dossier de suppression, appgre.

Articles qui pourrait vous intéresser :

Comment écrire du code shell bash testable unitaire?
changer la version de python lors de l'exécution du script shell
Renommer plusieurs fichiers séparés par un caractère spécial en modifiant l'ordre
Divisez le contenu d'une chaîne en utilisant comme délimiteur le "="