Как отловить убирание с иконки мыши в трее. [Delphi]
nikfel © (2007-12-11 09:54:00)
Подскажите пожалуйста.Использую TkolTrayIcon. При помещении
мыши отловить получается, а убирание не выходит. Пробовал через
wm_mouseleave, но не получается. Заранее спасибо.
procedure TForm1.TrayIcon1Mouse(Sender: PObj; Message: Word);
begin
If Message=wm_mousemove then
begin
//при помещении мыши
end;
end;
Vladimir Kladov (2007-12-11 16:03:00) [1]
Система аткого сообщения не шлёт.
Можно только головой. Все сообщения мыши от трея ловите,
координаты запоминаете, таймер включаете. Если при проверке
таймером обнаруживается, что мшь уехала, а сообщений больше не
было, то ушла.
А головой думать вообще полезно.
Наверх 
ЧАТ |
Орешник |
|
