![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сообщение от колеса мыши [D6, Win2k]
arcad © (2002-10-10 16:24:00)Уважаемые мастера.
Как написать обработчик сообщения от колеса мыши?
Как узнать на каком компоненте и в какую сторону повернулось колесо?
Если можно, кусочек кода плиз.
Набережных С. (2002-10-10 18:24:00) [1]type
TCEdit = class(TEdit);
TCEdit(Edit1).OnMouseWheel:=...
arcad (2002-10-10 17:43:00) [2]
> AL2002 © (10.10.02 17:18)
Поймал сообщение от колеса:
procedure WMMouseWheel(var Msg: TMessage);message WM_MOUSEWHEEL;
procedure TForm1.WMMouseWheel(var Msg: TMessage);
begin
Label1.Caption:="А все таки оно вертится";
end;
Как узнать на ком мышь-то в этот момент была?
Желательно узнать прямо в обработчике.
AL2002 (2002-10-10 17:18:00) [3]>arcad © (10.10.02 17:04)
Ты можешь над контролами событие онмаус мув делать. Чтобы, если мыша над ними, давать какое-то значение глобальной переменной. А событие формы OnMouseWheel пусть уже зависит от значения этой переменной. Посылай им сообщение WM_MOUSEWHEEL.
arcad (2002-10-10 17:04:00) [4].
> AL2002 © (10.10.02 16:48)
> событие OnMouseWheel
Спасибо.
Я написал такой обработчик, но присвоить я его могу только форме.
А мне нужно, что бы на это событие реагировали другие компоненты, например TEdit. А у него нет события OnMouseWheel.
Как быть то?
Нашел вот что:
TControl.MouseWheelHandler(var Message: TMessage).
Может так? Только какой мессадж и как его обрабатывать?
Ни разу не писал обработчик сообщений.
AL2002 (2002-10-10 16:48:00) [5]событие OnMouseWheel