ants, x As Single, y As Single)
Public Event MouseLeave()

Private m_bTracking As Boolean
Private m_hWnd As Long
Private m_hWndParent As Long
Private m_bUseCC As Boolean
Private m_bUseCapture As Boolean
Public Enum EMouseTrackMethods
   eMouseTrackDetect = -1
   eMouseTrackUser32 = 0
   eMouseTrackComCtl32 = 1
   eMouseTrackWorkAround = 2
End Enum
Private m_eMethod As EMouseTrackMethods

Private Sub pDetectMethod()
Dim tVI As OSVERSIONINFO
      
   ' Default to use COMCTL32.DLL. (Requires IE4.0 or higher i