ORDER = &amp;H200 ' Don't do owner Z ordering
    SWP_NOREDRAW = &amp;H8
    SWP_NOREPOSITION = SWP_NOOWNERZORDER
    SWP_NOSIZE = &amp;H1
    SWP_NOZORDER = &amp;H4
    SWP_DRAWFRAME = SWP_FRAMECHANGED
    HWND_NOTOPMOST = -2
End Enum
' Add to translate RGB - OleColor
Private Declare Function OleTranslateColor Lib "OLEPRO32.DLL" (ByVal OLE_COLOR
 As Long, ByVal HPALETTE As Long, pccolorref As Long) As Long
Private Const CLR_INVALID = -1
Private Declare Function timeGetTime Lib "winmm.dll" () As Long

Priva