FindFirstChangeNotifikation vs. ReadDirectoryChangesW vs. SHChangNoitifyRegister

[Rollo62]

Hallo zusammen,

ich habe schonmal FindFirstChangeNotifikation mit C++ für das Überwachen von Directories und Files eingesetzt.
Funktionierte ganz OK.
(Also neue Files melden, Löschen melden, umbenennen, o.ä. melden ohne Polling).
http://www.delphipraxis.net/152046-f...anstossen.html

Jetzt bräuchte ich das wieder, und ich checke gerade was es da so Alles gibt.
Dafür gibt es auch eine Lösung mit ReadDirectoryChangesW.
http://forum.codecall.net/topic/7631...r-for-changes/

Welches ist denn "moderner" oder was für Vor- Nachteile gibt es da zwischen den Beiden ?
Die scheinen erstmal ziemlich das Gleiche zu machen.

Mit FindFirstChangeNotifikation war ich ganz zufrieden seinerzeit, auch weil es mit einem WaitForMultipleObjects effizient arbeiten kann.

Das ReadDirectoryChangesW habe ich jetzt nur kurz gecheckt, läuft auch, aber da fehlt offenbar ein Wait im Thread.
Das ReadDirectoryChangesW scheint selbst blockend zu sein, und in der Funktion ein Wait zu setzen.
Beim Beenden des Demos gibt es dann MemoryLeaks.

Wie kann man das ReadDirectoryChangesW abbrechen, um den Thread sauber zu Beenden, ein Timeout scheint es nicht zu geben.

ReadDirectoryChangesW oder FindFirstChangeNotifikation , was sollte man Nutzen ?


Update:
Ok, ich sehe gerade da kann man was über https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx machen kann,
und doch Sync oder Async arbeiten.
Das Demo oben hat anscheinend nur den synchronen Code drin, ohne Overlapping.

Es scheint hier noch eine weitere Möglichkeit zu geben mit SHChangeNotifyRegister.

Die Fragen bleiben:
- Was sind Vor- Nachteile / Unterschiede
- Welche sollte man nehmen für das Überwachen ob Files erzeugt oder gelöscht werden ?
- Welche Version ist am zukunftssichersten ?

Vieleicht hat ja jemand damit schon mehr Erfahrungen damit gemacht ?

Rollo

[TiGü]

Zitat von Rollo62:

Hallo zusammen,

ich habe schonmal FindFirstChangeNotifikation mit C++ für das Überwachen von Directories und Files eingesetzt.
Funktionierte ganz OK.
(Also neue Files melden, Löschen melden, umbenennen, o.ä. melden ohne Polling).
http://www.delphipraxis.net/152046-f...anstossen.html

Jetzt bräuchte ich das wieder, und ich checke gerade was es da so Alles gibt.
Dafür gibt es auch eine Lösung mit ReadDirectoryChangesW.
http://forum.codecall.net/topic/7631...r-for-changes/

Welches ist denn "moderner" oder was für Vor- Nachteile gibt es da zwischen den Beiden ?
Die scheinen erstmal ziemlich das Gleiche zu machen.

Im ersten Link heißt es:
"To retrieve information about the specific change as part of the notification, use the ReadDirectoryChangesW function. This function also enables you to provide a completion routine."

[Glados]

Vielleicht kannst du ja hiermit was anfangen. Genutzt wird ReadDirectoryChangesW.
https://github.com/HeidiSQL/HeidiSQL...ctoryWatch.pas

[Rollo62]

Hallo Glados,

vielen Dank für den Link, Heidi ist ja komplett mit Overlapped und Wait.
Das sollte helfen das Blockieren zu verhindern.

@TiGü
Danke auch, ich denke die Funktionen hängen Alle irgendwie zusammen.
Ich brauche aber nichts erweitertes (zumindest im Moment), und ich weiss das der FirstChange.. schon ausreicht.

Die Frage bleibt was ist denn jetzt der beste und effizienteste Weg ?
(die Qual der Wahl).

Ich denke ich probier jetzt auch noch die Heidi-Lösung von Glados aus, und melde mich was damit passiert ...

Rollo

[Glados]

Zitat:

Ich denke ich probier jetzt auch noch die Heidi-Lösung von Glados aus, und melde mich was damit passiert ...

Man braucht nur diese eine Unit zum Glück.

[Rollo62]

Hallo Glados,

ja das funktionier super.
Im Gegensatz zu den anderen Lösungen bekomme ich auch alle Verschiebe-Operationen etc. mit.
Ok, brauche ich eigentlich nicht, aber wenn schon dann schon.

Die Unit ist wohl Teil der CromisLibrary von Iztok Kacin, aber die Site www.cromis.net scheint leider nicht mehr zu existieren.

Zum Glück hatte ich noch eine komplette Library, da muss ich dann nochmal näher reinschauen.

Danke nochmal für den Tipp.

Rollo

[Glados]

Ich merke gerade, dass meine Unit der DirectoryWatch um einiges anders aussieht als die Version bei Github.
Da ich meine Unit erst seit 2012 nutze denke ich, dass sie neuer ist. Wo auch immer ich die gefunden habe.

Beispielsweise lautet in Execute eine Zeile bei mir

Delphi-Quellcode:

procedure TDirWatchThread.Execute;
...
if ReadDirectoryChangesW(FDirHandle, FIOResult, IO_BUFFER_LEN, FWatchSubTree, FFilter, @ResSize, @Overlap, nil) then
 begin
  WaitResult := WaitForMultipleObjects(2, @Events[0], False, INFINITE);

Bei Github

Delphi-Quellcode:

procedure TDirWatchThread.Execute;
...
if ReadDirectoryChangesW(FDirHandle, FIOResult, FBufferSize, FWatchSubtree, FFilter, @ResSize, @Overlap, nil) then
 begin
  WaitResult := WaitForMultipleObjects(Length(Events), @Events, FALSE, INFINITE);

BeyondCompare zeigt mir 61 unterschiedliche Abschnitte.

[Rollo62]

Ich habe die 2te Variante, Änderungsdaten von 2011 bis 2014.
Copyright ist von 2009, scheint überall gleich zu sein.

Ich weiss leider nicht mehr wo ich das herhabe.

Rollo

[Glados]

Könntest du mir diese Unit zum Vergleich zur Verfügung stellen?

Meine Unit scheint dann doch älter zu sein. Eine neuere finde ich nicht. Meine ist außerdem von mir um ein paar Properties erweitert worden (eine wichtige Funktionalität mehr).

[Rollo62]

Hallo Glados,

ein Problem hatte die Unit aber, wenn man das Base directory selbst entfernt läuft der Thread wild.
Das kann man aber leicht beheben:

Delphi-Quellcode:

        begin
          ErrorMessage := SysErrorMessage(GetLastError);
          SignalError(ErrorMessage);

          Terminate; //S4: Added 08.11.17: Prevent endless loop when removing base directory
          Exit;
        end;
      end;
    end
    else
    begin
      ErrorMessage := SysErrorMessage(GetLastError);
      SignalError(ErrorMessage);
    end;

Ich kann dir die Unit zuschicken.

Rollo