ZooFlow: Remove ClassWin32, replace with Modules.Windows

Windows/NativeMethods.vb

@@ -4,16 +4,21 @@ Imports System.Text
 Public Class NativeMethods
     Public Declare Function GetWindowTextLength Lib "user32.dll" Alias "GetWindowTextLengthA" (ByVal hwnd As Int32) As Integer
     Public Declare Function GetWindowText Lib "user32.dll" Alias "GetWindowTextA" (ByVal hWnd As IntPtr, ByVal WinTitle As String, ByVal MaxLength As Integer) As Integer
-
     <DllImport("Shell32", CharSet:=CharSet.Auto, SetLastError:=True)>
     Public Shared Function ShellExecuteEx(ByRef lpExecInfo As ShellExecuteInfo) As Boolean
     End Function
+    <DllImport("user32", EntryPoint:="SetClipboardViewer")>
+    Public Shared Function SetClipboardViewer(ByVal hWnd As IntPtr) As IntPtr
+    End Function
     <DllImport("user32.dll")>
     Public Shared Function GetDC(ByVal hwnd As IntPtr) As IntPtr
     End Function
     <DllImport("user32.dll")>
     Public Shared Function ReleaseDC(ByVal hwnd As IntPtr, ByVal hdc As IntPtr) As IntPtr
     End Function
+    <DllImport("User32.dll")>
+    Public Shared Function ReleaseCapture() As Boolean
+    End Function
     <DllImport("user32.dll")>
     Public Shared Function GetWindowRect(ByVal hWnd As HandleRef, ByRef lpRect As RectangleAPI) As Boolean
     End Function
@@ -101,6 +106,7 @@ Public Class NativeMethods
     Public Declare Function GlobalDeleteAtom Lib "kernel32" (ByVal Atom As Short) As Short
 
     Public Const STANDARD_RIGHTS_REQUIRED As Integer = &HF0000
+
     Public Const SECTION_QUERY As Short = &H1
     Public Const SECTION_MAP_WRITE As Short = &H2
     Public Const SECTION_MAP_READ As Short = &H4
@@ -108,10 +114,12 @@ Public Class NativeMethods
     Public Const SECTION_EXTEND_SIZE As Short = &H10
     Public Const SECTION_ALL_ACCESS As Integer = STANDARD_RIGHTS_REQUIRED Or SECTION_QUERY Or SECTION_MAP_WRITE Or SECTION_MAP_READ Or SECTION_MAP_EXECUTE Or SECTION_EXTEND_SIZE
     Public Const FILE_MAP_ALL_ACCESS As Integer = SECTION_ALL_ACCESS
+
     Public Const PROCESS_VM_OPERATION As Short = &H8
     Public Const PROCESS_VM_READ As Short = &H10
     Public Const PROCESS_VM_WRITE As Short = &H20
     Public Const PROCESS_ALL_ACCESS As Long = &H1F0FFF
+
     Public Const MEM_COMMIT As Short = &H1000
     Public Const MEM_RESERVE As Short = &H2000
     Public Const MEM_DECOMMIT As Short = &H4000
@@ -120,12 +128,26 @@ Public Class NativeMethods
     Public Const MEM_PRIVATE As Integer = &H20000
     Public Const MEM_MAPPED As Integer = &H40000
     Public Const MEM_TOP_DOWN As Integer = &H100000
+
     Public Const INVALID_HANDLE_VALUE As Integer = -1
     Public Const SW_SHOW As Short = 5
+
     Public Const SEE_MASK_INVOKEIDLIST = &HC
     Public Const SEE_MASK_NOCLOSEPROCESS = &H40
     Public Const SEE_MASK_FLAG_NO_UI = &H400
+
+    Public Const ULW_COLORKEY As Integer = &H1
+    Public Const ULW_ALPHA As Integer = &H2
+    Public Const ULW_OPAQUE As Integer = &H4
+
+    Public Const AC_SRC_OVER As Byte = &H0
+    Public Const AC_SRC_ALPHA As Byte = &H1
+
+    Public Const HTCAPTION As Integer = &H2
+
+    Public Const WM_NCLBUTTONDOWN As Integer = &HA1
     Public Const WM_HOTKEY As Integer = &H312
+    Public Const WM_DRAWCLIPBOARD As Integer = &H308
 
     Public Enum PageProtection As UInteger
         NoAccess = &H1
@@ -148,6 +170,17 @@ Public Class NativeMethods
         CWP_SKIPTRANSPARENT
     End Enum
 
+    <StructLayout(LayoutKind.Sequential)>
+    Public Structure WINDOWPOS
+        Public hwnd As IntPtr
+        Public hwndInsertAfter As IntPtr
+        Public x As Integer
+        Public y As Integer
+        Public cx As Integer
+        Public cy As Integer
+        Public flags As Integer
+    End Structure
+
     Public Structure RectangleAPI
         Public Left As Integer
         Public Top As Integer