Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перенаправление событий мыши

hooch © (2004-09-21 07:31:00)
День добрый !
Столкнулся с такой проблемой: есть контрол который не имеет фокуса и над которым находится указатель мыши, если на мыши крутиться колесо нужно перетранслировать это событие контролу (не передвая фокус).
Сначала на событие OnMouseEnter написал SetCapture(контрол.Handle) не помогло, потом на ApplicationEvent.OnMessage проверял если мышь над контролом и сообщение WM_MOUSEWHEEL пересылал ему ето сообщение и через SendMessage и через Perform(CM_MOUSEWHEEL) тоже не помогло, подсткажите как быть ?

hooch (2004-09-21 11:41:00) [1]
Мда, может быть и так

_ALEXey_ (2004-09-21 10:47:00) [2]
[4] Извиняюсь, это не сюда.

_ALEXey_ (2004-09-21 10:46:00) [3]
procedure TForm1.Label1MouseEnter(Sender: TObject);
begin
Button1.Perform(WM_KEYDOWN, VK_SPACE, 0)
end;

КаПиБаРа (2004-09-21 08:56:00) [4]
hooch (21.09.04 8:44) [2]
А может в обработчике WM_MOUSEWHEEL этого компонента стоит проверко на наличие фокуса или еще что-то.
============================== Вещи не такие, какими кажутся. ==============================

hooch (2004-09-21 08:44:00) [5]
так WM_MOUSEWHEEL и вызывает конктреное дейстиви - изменение масштаба

КаПиБаРа (2004-09-21 08:25:00) [6]
hooch (21.09.04 7:31)
сообщение WM_MOUSEWHEEL пересылал ему ето сообщение и через SendMessage и через Perform(CM_MOUSEWHEEL) тоже не помогло, подсткажите как быть ?

Пересылай не MOUSEWHEEL, а сообщения вызывающие конкретные действия, например проклутку ScrolBar или изменение масштаба.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »