ZooFlow: Remove ClassWin32, replace with Modules.Windows

GUIs.ZooFlow/ClipboardWatcher/Watcher.vb

@@ -1,4 +1,5 @@
 Imports System.Runtime.InteropServices
+Imports DigitalData.Modules.Windows
 
 Namespace ClipboardWatcher
     Public Class Watcher
@@ -12,12 +13,12 @@ Namespace ClipboardWatcher
 
         Private Sub New()
             MyBase.CreateHandle(New CreateParams)
-            _Handle = ClassWin32.SetClipboardViewer(Handle)
+            _Handle = NativeMethods.SetClipboardViewer(Handle)
         End Sub
 
         Protected Overrides Sub WndProc(ByRef m As Message)
             Select Case m.Msg
-                Case ClassWin32.WM_DRAWCLIPBOARD
+                Case NativeMethods.WM_DRAWCLIPBOARD
                     Dim oData As IDataObject = Clipboard.GetDataObject
                     RaiseEvent ClipboardChanged(Me, oData)
             End Select
@@ -38,7 +39,7 @@ Namespace ClipboardWatcher
                     ' aufgerufen werden
                 End If
                 MyBase.DestroyHandle()
-                Dim H As IntPtr = ClassWin32.SetClipboardViewer(_Handle)
+                Dim H As IntPtr = NativeMethods.SetClipboardViewer(_Handle)
             End If
             _DisposedValue = True
         End Sub