Delphi notification lorsqu'un fichier est mis à jour

Question

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

Je voudrais recevoir une notification lorsque l'un de ces fichiers temporaires sont modifiés, et offrir à l'utilisateur d'enregistrer le document modifié à la base de données.

Quelle est la façon la plus simple de le faire en Delphi7? (Je suppose que cela nécessite un peu de magie shell ou d'un composant 3ème partie)

Merci!

Answer 1

Vous pouvez:

1. utiliser la fonction API Win32 SHChangeNotifyRegister pour surveiller les changements dans le dossier temp, et alors votre chèque de rappel si vos fichiers temporaires rapportent des changements. Comme vous connaissez le (s) fichier (s) exact (s) qui vous intéresse, vous pouvez les contrôler manuellement pour connaître les changements de taille et d'horodatage en utilisant FindFirstFile dans une minuterie ou un fil.

Answer 2

Vous pouvez détecter les modifications dans vos fichiers temporaires (ou n'importe quel fichier) à l'aide du composant TJvChangeNotify de la collection JEDI JVCL.

Answer 3

En plus de ce RRuz et Remy Lebeau a écrit:

Notez que TJvChangeNotify dans l'unité JvChangeNotify utilise l'appel API FindFirstChangeNotification; this est la documentation MSDN. Notez que c'est un peu contre-intuitif: voir le fil mentionné ci-dessous sur la façon de l'utiliser dans une boucle while.

Il y a aussi l'appel de l'API ReadDirectoryChanges, qui n'est pas enveloppé par le JCL/JVCL, et a la documentation MSDN here et il y a un Delphi win32 example aussi bien.

This thread explique les différences entre les deux appels API.

--jeroen

Answer 4

Jetez aussi un coup d'œil à ceci: http://www.cromis.net/blog/downloads/directory-watch/ et How to monitoring directory for files in Delphi XE?