Подскажите пожалуйста.Использую TkolTrayIcon. При помещении мыши отловить получается, а убирание не выходит. Пробовал через wm_mouseleave, но не получается. Заранее спасибо.
procedure TForm1.TrayIcon1Mouse(Sender: PObj; Message: Word);
begin
If Message=wm_mousemove then
begin
//при помещении мыши
end;
end;

Система аткого сообщения не шлёт.

Можно только головой. Все сообщения мыши от трея ловите, координаты запоминаете, таймер включаете. Если при проверке таймером обнаруживается, что мшь уехала, а сообщений больше не было, то ушла.

А головой думать вообще полезно.