Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.30;
Скачать: CL | DM;

Вниз

Как знать, что мышь покинула кнопку?   Найти похожие ветки 

 
Митяй2   (2005-01-26 20:07) [0]

Как знать, что указатель мыши покинул кнопку TBitBtn?
Конечно, я могу использовать OnMouseMove формы, но это как-то не красиво, и при этом я могу привести несколько примеров, когда мы не получим нужного результата (не узнаем, что указатель не на кнопке) при использов. события OnMouseMove формы:
- переключились на другое приложение Alt+Tab
- открылась модально другая форма этого же приложения
и т.п.


 
Gero ©   (2005-01-26 20:10) [1]

CM_MOUSELEAVE


 
Митяй2   (2005-01-26 20:12) [2]

Попробуем отловить...


 
Митяй2   (2005-01-26 21:12) [3]

В TfmForm = class(TForm)
public пишу:
procedure MyAppMessage(var Msg: TMsg; var Handled: Boolean);

при OnCreate формы пишу:

Application.OnMessage:=fmForm.MyAppMessage;

Много всяких сообщений отлавливается, только не CM_MOUSELEAVE, не приходит оно и все. :-((((


 
Gero ©   (2005-01-26 21:17) [4]

Делай наследника интересующего тебя компонента и в нем лови CM_MOUSELEAVE.


 
Митяй2   (2005-01-26 21:18) [5]

Спасибо, попробуем сделать наследника TBitBtn


 
Muchacho   (2005-01-26 22:57) [6]

www.delphiworld.narod.ru - там есть как это сделать. Поищи OnMouseLeave


 
tmpname   (2005-01-27 18:01) [7]

У меня CM_MOUSELEAVE успешно отлавливалось в WndProc


 
GrayFace ©   (2005-02-02 02:14) [8]

Меняй WindowProc у кнопки.



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

Текущий архив: 2005.10.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.048 c
14-1128623461
Michael5
2005-10-06 22:31
2005.10.30
Поделитесь, кто чего интересного за последнее время (а может,


1-1128577548
Norsk
2005-10-06 09:45
2005.10.30
Определение TPopupMenu


4-1124892402
NioBium
2005-08-24 18:06
2005.10.30
TrayIcon без формы


5-1105589926
farkhod
2005-01-13 07:18
2005.10.30
Компоненты TTextClient и TTextServer


2-1128605830
Толян
2005-10-06 17:37
2005.10.30
Массивы