Verzeichnis überwachen

[braunbär]

Ich habe im Kopf, dass es irgendwie möglich ist, ein Verzeichnis "überwachen" zu lassen und von Windows verständigt zu werden, wenn sich in dem Verzeichnis etwas geändert hat. Hab dazu aber nichts gefunden.

[Warf]

Das sind so genannte Filesystem watches, schnelles googlen hat mir auf Windows diese API gefunden: https://learn.microsoft.com/de-de/windo ... dfrom=MSDN

[af0815]

Wenn man länger nach filesystem Watchers sucht ,findet man auch Komponenten dazu, meistens Delphi, aber auch Lazarus.

[fliegermichl]

FindFirstChangeNotification und WaitForSingleObject mit entsprechenden Parametern.

[Jorg3000]

Dazu gibt's "DirectoryWatcher" auf github
https://github.com/Wosi/DirectoryWatcher

This is an abstraction layer for
- ReadDirectoryChangesW on Windows
- FSEvent on Mac OS
- inotify on Linux

[af0815]

Dazu gibt's "DirectoryWatcher" auf github
https://github.com/Wosi/DirectoryWatcher

This is an abstraction layer for
- ReadDirectoryChangesW on Windows
- FSEvent on Mac OS
- inotify on Linux

Ah, hat wer die komplett verschiedenen APIs mal abstrahiert. Habe mich vor Jahren damit gespielt, da waren aber die Mechanismen so unterschiedlich das ich es nicht weiter verfolgt habe. Gut zu wissen. Danke für die Info.

[braunbär]

Dazu gibt's "DirectoryWatcher" auf github
https://github.com/Wosi/DirectoryWatcher

This is an abstraction layer for
- ReadDirectoryChangesW on Windows
- FSEvent on Mac OS
- inotify on Linux

Danke!

Wahnsinn, mit so einer komfortablen fix - und fertigen Unit habe ich nicht gerechnet. 7 Jahre alt - ich habe vor ein paar Jahren einmal nach so etwas gesucht, sicher keine 7 Jahre her, aber das habe ich damals nicht gefunden

Heruntergeladen, Demoprogramm kompiliert und funktioniert auf Anhieb

[Meridian]

Hallo,

hat jemand noch ein weiteres kleines Beispielprogramm, wie man den DirectoryWatcher einsetzt?

Vielen Dank.

Gruß aus Norddeutschland.

[af0815]

Hallo,

hat jemand noch ein weiteres kleines Beispielprogramm, wie man den DirectoryWatcher einsetzt?

Vielen Dank.

Gruß aus Norddeutschland.

Das Demo was beim DirectoryWatcher dabei ist, ist nicht genug ? Oder was fehlt dir dort ?

[Mathias]

Zu diesem Thema fällt mir auch noch was ein.
Der Datei Manger Nemo von Mint verhält sich das auch merkwürdig.
Ich habe meine Daten alle aus einer NAS, welche mit NFS angebunden ist. Jetzt das merkwürdigem wen ich mit Lazarus etwas kompiliere, verschwinden einige Dateien in der Liste. Oder wen ich h2pas ausrufe, dann ist die *.pp nicht ersichtlich. Erst beim aktualisieren der Ansicht mit F5 kommt alles richtig.
Aber das komisch, ich habe ein Hilfsprogramm mit einem Memo. Und wen dort Memo.SafeToFile kommt, die dort gespeicherte Datei ist sofort ersichtlich. Wieso auch immer.

[Meridian]

Hallo,

hat jemand noch ein weiteres kleines Beispielprogramm, wie man den DirectoryWatcher einsetzt?

Vielen Dank.

Gruß aus Norddeutschland.

Das Demo was beim DirectoryWatcher dabei ist, ist nicht genug ? Oder was fehlt dir dort ?

Der DirectoryWatcher ist grundsätzlich klasse. Habe aber auch weiterprobiert, damit die SubFolder überwacht werden. Ich weiß aber nicht, wie man den Parameter richtig setzt.

Bin nur Hobby-"Programmierer" und benötige die Folder-Überwachung in einem Programm mit Formularen...
Kann mir jemand helfen?

Vielen Dank dafür, wenn mir jemand weiterhilft...

[af0815]

Hast du versucht das Beispiel mit dem Parameter recursive zu starten ? Weil das sollte der Parameter sein, der eine Überwachung von Subfoldern aktiviert.

[Meridian]

Hallo,

das mit dem Parameter recursive hat bei mir nicht funktioniert.

Ich habe in der procedure TDirectoryWatcherDemo.DoRun etwas geändert...

Code: Alles auswählen

procedure TDirectoryWatcherDemo.DoRun;
var
  FolderToWatch: String;
  WatchSubFolders: Boolean;
  DirectoryWatcher: IDirectoryWatcher;
begin
  FolderToWatch := GetOptionValue('folder');
  if FolderToWatch = '' then
    FolderToWatch := ExtractFileDir(ParamStr(0));

  //WatchSubFolders := [b][i]HasOption('r', 'recursive')[/i][/b];   // Original-Code...
  // geändert in ...
  WatchSubFolders := [b][i]true[/i][/b];   
....

Damit werden auch die Subfolder überwacht.

Dennoch benötige ich diese Überwachung in einem Programm mit Formularen und es wäre klasse, wenn die Ereignisse in ein Memo geschrieben werden. Das habe ich bisher nicht geschaftt.

Gruß aus Niedersachsen...

[PascalDragon]

Ich habe in der procedure TDirectoryWatcherDemo.DoRun etwas geändert...

Bitte nutze [ code ][ /code ] (ohne Leerzeichen), damit es besser aussieht.

[Meridian]

Moin zusammen,

bin erneut an dem Thema "Verzeichnis überwachen" dran.
Mir gefällt "DirctoryWatcher" grundsätzlich richtig gut, weil Datei- und Verzeichnisänderungen wie hinzugefügt, gelöscht und geändert erkannt werden inkl. der Subfolder.

-------------
Dazu gibt's "DirectoryWatcher" auf github
https://github.com/Wosi/DirectoryWatcher
-------------

Ich kann leider aus der Konsolenanwendung keine grafische Anwendung machen. Habe auch mit anderen Komponenten probiert, die immer nie ganz vollständig sind.

Vielleicht hat ja jemand Lust dazu, mir zu helfen.

Was mir auch sehr gut gefällt, ist die Komponente "ATFileNotification" bzw. die Demo, die allerding mit Delphi geschrieben wurde und ich auch das nicht umgebogen bekomme. Das habe ich bei https://torry.net/components/files-and- ... ification/ gefunden.

Ich sag schon mal danke für die Hilfe, die ihr mir zukommen lasst.

Gruß Helmut