Обработка щелчка мыши

[sacrifice]

Здравствуйте!

Столкнулся с проблемкой, поиск и чтение мануалов пока не привели к результату, может если кто знает или сталкивался с этим - подскажите, пожалуйста, как быть.


Приложение активно (основная форма активна), на форме множество всяких checkbox'ов, кнопок, надписей. Нужно написать обработчик для щелчка правой кнопки мыши, но учитывая то что курсор мышки может находится где угодно (не факт что на форме программы). И еще очень не хочется писать одинаковый обработчик щелчка правой кнопки мыши для каждого элемента на форме (надписи, кнопки), может можно их как-то объединить.


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

[Lumen]

Хук на мышь?

[kibernetics]

поиск и чтение мануалов пока не привели к результату

ой ли?

учитывая то что курсор мышки может находится где угодно

зачем тебе это учитывать?
тебе скорей всего достаточно только события MouseUp для контрола, и в нём проверяй:

Код: Выделить всё

Private Sub контрол_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
'нажата правая кнопка мышатины
...
End If
End Sub

когда поймёшь принцип, разберёшься и с оптимизацией повторяющегося кода

[sacrifice]

поиск и чтение мануалов пока не привели к результату

ой ли?

учитывая то что курсор мышки может находится где угодно

зачем тебе это учитывать?
тебе скорей всего достаточно только события MouseUp для контрола, и в нём проверяй:

Код: Выделить всё

Private Sub контрол_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
'нажата правая кнопка мышатины
...
End If
End Sub

когда поймёшь принцип, разберёшься и с оптимизацией повторяющегося кода

ты ничего не понял, мне не достаточно только события MouseUp для контрола, мне нужно "глобально", даже если кликнул правой кнопкой по кнопке "Пуск" или окну другого приложения... проблема уже решилась, помогли на vbnet.ru

Но все равно, спасибо!