Incase anyone else is interested in disabling the focus rectangle on a control heres how it's done...Quite handy for custom controls.
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Sub KillFocus(Hnd)
Const WM_KILLFOCUS = &H8
SendMessage Hnd, WM_KILLFOCUS, 0&, 0&
End Sub
Enjoy
Steve
