TWMMouseWheel

← →
Comp © (2007-02-23 23:36) [0]

Столкнулся с проблемой. Создаю окно-дочернее (WS_CHILD) и события от колесика мыши не обрабатываются. Просто не поступает сообщение моему дорчернему окну. Убираю стиль WS_CHILD и все работает.
Что делать?
Зараннее спасибо!

← →
Eraser © (2007-02-24 00:00) [1]

> [0] Comp © (23.02.07 23:36)

а событие OnMouseWheel срабатывает?

← →
Comp © (2007-02-24 10:19) [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;

Точнее, SetFocus(WndHandle)

Заговорился...

TWMMouseWheel Найти похожие ветки