Сообщение WM_RBUTTONDOWN

Сообщение WM_RBUTTONDOWN сообщает окну, что правая кнопка мыши была нажата, когда курсор находится внутри клиентской области окна. Сообщение идентифицирует позицию курсора относительно окна, а также состояние клавиш и кнопок мыши. Нет необходимости создавать специальный дескриптор для сообщения WM_RBUTTONDOWN в вашей программе. Событие MouseDown выполняет ту же работу, что и WM_RBUTTONDOWN и проще в использовании. Но можно использовать для связи с другими программами

Возвращаемое значение

Параметры

wParam

Комбинация следующих флагов определяют нажатия клавиш:

MK_CONTROL = &H8

Нажата клавиша Ctrl

MK_LBUTTON = &H1

Нажата левая кнопка мыши

MK_MBUTTON = &H10

Нажата средняя кнопка мыши

MK_RBUTTON = &H2

Нажата правая кнопка мыши

MK_SHIFT = &H4

Нажата клавиша Shift

MK_XBUTTON1 = &H20

Windows 2000: Нажата первая кнопка X

MK_XBUTTON2 = &H40

Windows 2000: Нажата вторая кнопка X

lParam

Координаты (x,y) курсора мыши относительно окна

Пример

' Заменим встроенное контекстное меню тектового поля
' на собственное. Создайте простое меню на форме
' и сделайте его невидимым. Расположите на форме
' текстовое поле
Private Sub Text1_MouseDown(Button As Integer, _
  Shift As Integer, X As Single, Y As Single)
  '
If Button = vbRightButton Then
   Call SendMessage(Form1.hwnd, _
   WM_RBUTTONDOWN, 0, 0&)
   Me.PopupMenu mnuMyPopup
   End If
End Sub

Смотри также

Категория