🚀 go-pugleaf

Rod <notat022005@end.of.msg> wrote:
>
> [...] How do I implement the function ReadDirectoryChangesW
> asynchronously?

Have you looked at the win32 API FindFirstChangeNotification?

//-------------------------------------------------------------
void __fastcall TMonitorThread::Execute()
{
    int Counter = 0;
    HANDLE hFind = FindFirstChangeNotification(FPath.c_str(), false, FILE_NOTIFY_CHANGE_LAST_WRITE);
    if( hFind != INVALID_HANDLE_VALUE )
      {
          while( !Terminated )
            {
                switch( WaitForSingleObject(hFind, 500) )
                  {
                      case WAIT_OBJECT_0: ++Counter;
                                          ::SendMessage(Application->MainForm->Handle, APP_FILECHANGE_NOTIFICATION, Counter, 0 );
                                          if( !FindNextChangeNotification(hFind) ) Terminate();
                                          break;
                      case  WAIT_TIMEOUT: break;
                      default           : Terminate();
                  }
            }
          FindCloseChangeNotification(hFind);
      }
}
//-------------------------------------------------------------

~ JD