, m_hWnd, WM_RBUTTONDOWN
      'detachMessage Me, m_hWnd, WM_MOUSEMOVE
      'detachMessage Me, m_hWnd, WM_LBUTTONUP
      'detachMessage Me, m_hWnd, WM_MBUTTONUP
      'detachMessage Me, m_hWnd, WM_RBUTTONUP
   End If
End Sub

Private Sub pTerminate()
   
   ' Stop subclassing:
   pUnSubClass
   
   ' Clear the window
   If (m_hWnd &lt;&gt; 0) Then
      ShowWindow m_hWnd, SW_HIDE
      SetParent m_hWnd, 0
      DestroyWindow m_hWnd
   End If
   m_hWnd = 0
   m_hWndParent = 0
   
   ' Clear background brus