Verzeichnisüberwachung mit TDirectoryWatcherBuilder

[slemke76]

Hallo zusammen,

ich würde gerne ein Verzeichnis überwachen und bin gerade dabei, ein wenig Prototyping zu machen.

Während ich mit den Komponenten von Cromis auf Anhieb geklappt hat, stehe ich offensichtlich mit den Komponenten von Wosi (https://github.com/Wosi/DirectoryWatcher) auf Kriegsfuß...

Ich habe mir eine (eigene kleine) Demo als VCL zusammengeschoben, die an diversen Fehlern innerhalb der DirectoryWatcherBuilder.pas (aus dem git Repo) hängen bleibt:
- Bezeichner erwartet, aber 'CLASS' gefunden
- "Deklaration von 'New' unterscheidet sich von vorheriger Deklaration
- diverse Folgefehler (vermute ich)

Hier die Stelle aus DirectoryWatcherBuilder.pas, an der es hängt - sowohl unter XE8 als auch unter 10.4 getestet:

Delphi-Quellcode:

unit DirectoryWatcherBuilder;
[...]
class function TDirectoryWatcherBuilder.New: IDirectoryWatcherBuilder;
begin
  Result := TDirectoryWatcherBuilder.Create;
end;

Mein Sample-Code

Delphi-Quellcode:

procedure TfMain.btnStartClick(Sender: TObject);
begin
  DirectoryWatcher := TDirectoryWatcherBuilder
                        .New
                        .WatchDirectory(eDirectoryName.Text)
                        .Recursively(cbWatchSubdirectories.Checked)
                        .OnChangeTrigger(OnFileEvent)
                        .Build;

end;

Ich steh irgendwie auf dem Schlauch, kann mir jemand "aufs Pferd helfen" ? Danke...

Sebastian