Помогите отловить в форме нажатие дополнительных кнопок Mous

[Fedorfx]

Собственно сабж.
Но одно но. В принципе знаю как отлавливать мессаги системы.
Там еще SetwindowLong используется.
SetWindowLong Me.hWnd, GWL_WNDPROC, AddressOf Test1

(Public Function Test1(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long)

Но я при использовании этого метода оболочка VB часто слетает, да и останоить по брейпоинту не получается пока из процедуры управление не вернется. Да и если ошибочка в коде - то VB слетает напроч.Одним словом слишком неудобно пользовать этот метод для ловли всего лишь 5 дополнительных кнопок мыша.
Видел я и способ с GetMessage по таймеру - но это вообще детский сад. Может кто подскажет какое нибудь элегантное решение??
P.S. У меня прога строит графики и мне необходимо по скролу их прокручивать. Много математики и отдавать ресурсы совсем неохота.

[GSerg]

Неправда, сабклассинг рулит. Тока юзать надо осторожно.

[Fedorfx]

Я не против Субклаасинга - но если прога ОГРОМНАЯ - то осторожность нужна ювелирная.
Если можно, приведите пример Вашего осторожного использования субклассинга плз.
В моем верхнем посте есть вункция Test1. Так вот если обработчик сообщений делать в ней да еще и при приходе нужного сообщщения выполнять определленые действия то при любой ошибке VB слетает да и брейкпоинт нельзя ставить до выхода из функции Test1.( Ставить можно -только ВБ не реагирует на клаву и мышь)

[GSerg]

А в этом случае (если обработчик велик и ужасен) следует написать оный, а потом поюзать его, не юзая сабклассинг. То есть функцию test1 будет вызывать другая процедурина, передавая разные параметры туда. Наверняка ведь нужно отследить некоторые сообщения, а не все, ну и передавай эти сообщения туда, типа как настоящие от окна, и лови баги.

[Fedorfx]

Вот и я про тоже.
Даже если из этой процедуру вызвать другую порочный круг не рвется. Первое что приходит на ум - создать таймер и по приходу нужного события его активировать на 1 тик. Так прокатит, но как то некрасиво. Хочется добавить просто обработку колеса мыши, а залазить в такие дебри.........

[MEMBER]

Fedorfx
Ты не понял. Тебе предлагают написать обработчик колеса мыши, то есть процедуру, которая будет вызываться после того, как ты перехватишь событие сабклассингом. _ОТКЛЮЧИТЬ_ сабклассинг и полностью отладить эту процедуру. Ты ведь знаешь, что в неё будет передаваться. Повесь на форму N кнопок, по количеству событий и пусть каждая из них вызывает процедуру обработки колеса мыши. Отладь обработчик, сохранись, включи сабклассинг и вперёд.

[Fedorfx]

Понял.
Буду пробывать.
Спасибо.