Дорогие друзья, помогите, пожалуйста.
Проблема в следующем.
Я отключаю системное контекстное меню (вырезать-копировать-вставить и т.п.) и заменяю его своим, которое появляется по клику правой кнопкой в поле. Использую для этого событие MouseDown и API:
If Button = vbRightButton Then
Call SendMessage(Form1.hwnd, WM_RBUTTONDOWN, 0, 0&)
Form1.PopupMenu myMenu
End If
Все замечательно работает, то есть системное контекстное меню подменяется моим. Но вот беда: команды системного меню продолжают выполняться, если я нажимаю соответствующие клавиши. Например, выполняется вставка по Shift+Insert даже в том случае, если в моем меню пункт вставки (с теми же горячими клавишами) имеет Enabled=False.
Как же отключить команды системного контекстного меню полностью, чтоб не реагировали на клавиши?
Заранее благодарен.
Ответить
|