1

FindFirstChangeNotification関数を使用して、ディレクトリの変更を監視しようとしています。これは、FindFirstChangeNotificationによって返されたハンドルを取得し、それをWaitForSingleObjectに詰め込んだ場合に機能します。問題は、WaitForSingleObjectがアプリケーションが戻るまでアプリケーション全体をブロックすることです。

それで、私は周りを見回しました、そして、RegisterWaitForSingleObjectが行く方法であったようです：

Sub monitorDir(dir As FolderItem)
  Declare Function FindFirstChangeNotificationW Lib "Kernel32" (dirPath As WString, watchChildren As Boolean, eventTypeFilter As Integer) As Integer
  Declare Function RegisterWaitForSingleObject Lib "Kernel32" (ByRef waiterHWND As Integer, HWND As Integer, cllbck As Ptr, _
  context As Integer, wait As Integer, flags As Integer) As Integer
  Dim allFilters As Integer = &h00000001 Or &h00000002 Or &h00000004 Or &h00000008 Or &h00000010_
      Or &h00000100
  Dim monitorHandle As Integer = FindFirstChangeNotificationW(dir.AbsolutePath, True, allFilters)
  If monitorHandle <> 0 Then
  Call RegisterWaitForSingleObject(myCallbackHWND, monitorHandle, AddressOf MyCallbackFn, 0, &hFFFFFFFF, 0)
End Sub

これは、アプリケーションが正常に実行され続けるため、機能しているように見えます。ただし、MyCallbackFnが呼び出されるとすぐに（つまり、ディレクトリで変更が発生すると）、状況は奇妙になります。ProcessExplorerおよびWindowsExplorerから、アプリケーションがクラッシュまたはロックアップし始めます。復元するには、Windowsからログアウトする必要があります。

現時点では、MyCallbackFnが行うことはこれだけです。

Sub MyCallbackFn()
  Declare Function UnregisterWaitEx Lib "Kernel32" (waitHWND As Integer, eventHandle As Integer) As Integer
  Call UnregisterWaitEx(myCallbackHWND, 0)
  MsgBox("Change Detected")
End Sub

RegisterWaitForSingleObjectを使用して間違ったツリーを吠えていますか、それを間違って使用しましたか、またはコールバックがシステムを内破する原因となるRealBasicにいくつかの制限がありますか？

4

2 に答える 2

2

登録したコールバック関数RegisterWaitForSingleObject()は、別のスレッド（http://msdn.microsoft.com/en-us/library/ms685061.aspx）で呼び出されます。

コールバックルーチンは、オブジェクトの状態が通知されるか、タイムアウト間隔が経過すると、ワーカースレッドによって実行されます。

RealBasicのスレッドサポートについては何も知りませんが、少なくともWindowsでのGUI操作は、通常、古いワーカースレッドだけでなく、特定のスレッドで実行する必要があります。したがって、MsgBox()そのワーカースレッドでの呼び出しはおそらく問題です。

簡単に試すことができるのは、 PostMessage()（またはRealBasicに相当するものを）呼び出して、アプリケーションが応答できるウィンドウメッセージキューにカスタムメッセージを投稿することです（たとえば、を呼び出すことによってMsgBox()）。

于 2011-04-08T18:29:44.887 に答える
0

関係ないかもしれませんが、MyCallBackFn（）はどこで宣言されていますか？インスタンスメソッドの場合は、AddressOfの代わりにWeakAddressOfを使用する必要があります。

于 2011-04-08T21:43:24.743 に答える