Глобальный перехват правой кнопки мыши

[Alprog]

На форме лежит ShockwaveFlashObject (flash10c.ocx), в котором играется флэш-ролик.
При нажатии на нём правой кнопкой мыши появляется контекстное меню, я же хочу задействовать правую кнопку для своих нужд.

Казалось бы достаточно ловить сообщения windows, но проблема в том, что у компонента нет свойства, которое бы позволяло узнать hwnd.
Тем не менее, контрол поглощает сообщения (то есть, если водить над ним мышью, то форме сообщения уже не приходят), что
наводит на мысли о том, что hwnd всё-таки у контрола есть, но простым смертым его давать не хотят.

Как бы мне всё-таки его получить? Или как ещё можно было бы перехватить правую кнопку мыши.

p.s. Пытался воспользоваться тем, что контекстное меню закрывается по клавиши escape.
Сделал таймер, который эмулировал постоянные нажатия escape, но контрол почему-то их игнорирует (пробовал и SendKeys и key_event).

[Alprog]

Я сделал это!

Достаточно было просто правильно сформулировать проблему для себя (что я сделал, когда писал предыдущий пост),
как тут же и появилось решение.

hwnd у контрола действительно есть, а ловлю я его очень просто:

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

flash.SetFocus        'Установить фокус на контроле
hwnd = GetFocus    'Функция из user32, возвращающая hwnd окна, имеющего фокус


[alibek]

Я думаю, что можно было бы обойтись и FindWindowEx.