Люди добрые, помогите...

Нужно отловить событие покидания мыши TGraphicControl. Некое подобие Javascript OnMouseOut

MouseMove ловлю следующим образом:

    procedure WMMouseMove(var Message: TWMMouseMove); message WM_MouseMove;

Нужно для того, чтобы перерисовать контрол когда мышка над ним и когда убегает.
Пробовал отлавливать граничные координаты в OnMouseMove... При быстром движении мыши они не ловятся.
Оставлял даже по два пиксела по бокам.
При учете, что контрол 16х16 это уже много...

Заранее спасибо!

Нашел

    procedure CMMouseLeave(var msg: TMessage); message cm_mouseleave;

Спасибо!