![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Hook на нажатие кнопок мыши
Lucifer © (2005-12-01 16:35:00)Здравствуйте!
Проблема в следующем:
- есть программа, которая висит в трее, но как пользователь нажал на среднюю (к примеру) кнопку мыши она из трея вылезает!
и ещё вопросик:
- как закрыть окно (или приложение), находящееся под курсором мыши!
Заранее благодарен!
Leonid Troyanovsky (2005-12-02 08:41:00) [1]
> Lucifer © (01.12.05 16:35)
> - есть программа, которая висит в трее, но как пользователь
> нажал на среднюю (к примеру) кнопку мыши она из трея вылезает!
Точно также, как и другие сообщения мыши в обработчике notify
сообщения, например:
case Msg.LParam of
..
WM_MBUTTONDOWN:
begin
Show;
ShowWindow(Application.Handle, SW_HIDE);
..
end;
end;
> - как закрыть окно (или приложение), находящееся под курсором мыши!
var
p: TPoint;
h: HWND;
begin
GetCursorPos(p);
h := WindowFromPoint(p);
if h <> 0 then
SendMessage(h, WM_CLOSE, 0, 0);
end;
--
Regards, LVT.