Discussion :

[Soulama]

Bonjour,

je cherche un moyen de moniterer un repertoire ou fichier sou delphi.
jai googlé, et jai trouver ShellChangeNotifier mais il me dit pas exactement quel fichier a eté changer ou suprimer.

Merci pour vos infos.
PS: ou bien un compo Delphi, ou un programme devrai sufir.

[ShaiLeTroll]

Avec FindFirstChangeNotification et FILE_NOTIFY_CHANGE_SIZE
Tu surveilles un dossier !

Avant de lancer FindFirstChangeNotification, tu parcours avec FindFirst\FindNext l'intégralité du dossier, dans une liste du mémorise les tailles de chaque fichier
Lors d'un WaitForSingleObject avec WAIT_OBJECT_0, tu sais que le dossier à changer de taille, tu n'as qu'a relancer un parcours FindFirst\FindNext, et tu compares avec la liste précédente !

C'est comme cela que j'ai fait pour un petit projet qui affichait le Delta dans des fichiers log en quasi-temps réel !

[Soulama]

merci je vais essayé ta methode

[guillemouze]

Avec FindFirstChangeNotification et FILE_NOTIFY_CHANGE_SIZE
Tu surveilles un dossier !

Avant de lancer FindFirstChangeNotification, tu parcours avec FindFirst\FindNext l'intégralité du dossier, dans une liste du mémorise les tailles de chaque fichier
Lors d'un WaitForSingleObject avec WAIT_OBJECT_0, tu sais que le dossier à changer de taille, tu n'as qu'a relancer un parcours FindFirst\FindNext, et tu compares avec la liste précédente !

C'est comme cela que j'ai fait pour un petit projet qui affichait le Delta dans des fichiers log en quasi-temps réel !

Plutôt que de mémoriser la taille des fichiers, tu peux tout simplement mémoriser le DateTime du dernier scan, et rechercher les fichiers dont le SysUtils.FileAge te retourne une date supérieure après notification.
Attention, il me semble que Now() et FileAge() ne retournent pas les dates sous la même forme, et qu'il existe une fonction FileDateToDateTime (ou un truc dans le genre) pour convertir.