![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TWMMouseWheel
Comp © (2007-02-23 23:36:00)Столкнулся с проблемой. Создаю окно-дочернее (WS_CHILD) и события от колесика мыши не обрабатываются. Просто не поступает сообщение моему дорчернему окну. Убираю стиль WS_CHILD и все работает.
Что делать?
Зараннее спасибо!
Comp (2007-02-24 10:21:00) [1]Точнее, SetFocus(WndHandle)
Заговорился...
Comp (2007-02-24 10:19:00) [2]Eraser ©
Не срабатывает.
Я сделал, правда через попу (как всегда).
Собака была зарыта в фокусе.
У меня помимо всего стоит OnWMVScroll
В нем поставил GetFocus(WndHandle) , где WndHandle - хэндл моего дочернего окна и тогда работает.
Просто заметил, что если убрать WS_CHILD, то по заголовку этого дочернего окна видно, что на нем нет фокуса.
выделяю - есть.
А если поставить вс_чилд, как бы не щелкал на дочернем окне-он не фокусируется.
99% - вторая собака зарыта в стиле материнского окна. Он у меня
WindowParams.Style := WS_CAPTION or WS_SYSMENU or WS_MINIMIZEBOX;
WindowParams.ExStyle := WS_EX_APPWINDOW or WS_EX_TOPMOST;
А стиль дочернего
WindowParams.Style := WS_CHILD or WS_VSCROLL or WS_HSCROLL;
Eraser (2007-02-24 00:00:00) [3]> [0] Comp © (23.02.07 23:36)
а событие OnMouseWheel срабатывает?