[Threads] Datei exklusiv öffnen

[sieppl]

Mit diesem Konstrukt fange ich viele Notifications erstmal ab und synchronisiere dann erst:

Delphi-Quellcode:

if WaitForSingleObject(FHandle, 500) = WAIT_OBJECT_0 then
      begin
        //catch mutliple notifications to enhance performance 
        FindNextChangeNotification(FHandle);
        while WaitForSingleObject(FHandle, 500) = WAIT_OBJECT_0 do
          FindNextChangeNotification(FHandle);
        Synchronize(ExecuteOnChange);
      end;

Falls Ihr bessere Ideen habt, bitte posten!

Grüße

Sebastian