Вниз
Скачать: CL | DM;

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

← →
hooch   (2004-09-21 07:31) [0]

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


← →
КаПиБаРа ©   (2004-09-21 08:25) [1]

hooch   (21.09.04 7:31)
сообщение WM_MOUSEWHEEL пересылал ему ето сообщение и через SendMessage и через Perform(CM_MOUSEWHEEL) тоже не помогло, подсткажите как быть ?


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


← →
hooch   (2004-09-21 08:44) [2]

так WM_MOUSEWHEEL и вызывает конктреное дейстиви - изменение масштаба


← →
КаПиБаРа ©   (2004-09-21 08:56) [3]

hooch   (21.09.04 8:44) [2]
А может в обработчике WM_MOUSEWHEEL этого компонента стоит проверко на наличие фокуса или еще что-то.

==============================
Вещи не такие, какими кажутся.
==============================


← →
_ALEXey_   (2004-09-21 10:46) [4]

procedure TForm1.Label1MouseEnter(Sender: TObject);
begin
 Button1.Perform(WM_KEYDOWN, VK_SPACE, 0)
end;


← →
_ALEXey_   (2004-09-21 10:47) [5]

[4] Извиняюсь, это не сюда.


← →
hooch   (2004-09-21 11:41) [6]

Мда, может быть и так



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
1-1095157928
SNV-Soft
2004-09-14 14:32
2004.10.03
Альтернатива OnMouseMove.....


11-1081078411
Василий
2004-04-04 15:33
2004.10.03
Установить KOL пакет


14-1095306740
КаПиБаРа
2004-09-16 07:52
2004.10.03
Опрос - Когда вы впервые пришли на этот форум?


14-1095145729
}|{yk
2004-09-14 11:08
2004.10.03
Копали ли вы в этом году картошку?


4-1092100856
Baloo
2004-08-10 05:20
2004.10.03
Перехватить курсорную клавишу и прибить




   Наверх