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

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

← →
theEnter   (2002-11-12 07:18) [0]

Вот такой вопрос: Как узнать что указатель мыши зашел внутрь границ компонента - например TImage.. и соответственно - вышел за его пределы?

---

← →
MBo ©   (2002-11-12 07:20) [1]

создать наследника с CM_MouseEnter и -Leave

---

← →
theEnter   (2002-11-12 07:25) [2]

Что типа этого ?

TMyPainBox = class(TPaintBox)
private
{ Private declarations }
fOnMouseEnter: TNotifyEvent;
fOnMouseLeave: TNotifyEvent;
procedure MouseEnter(Msg: TMessage); message CM_MOUSEENTER;
procedure MouseLeave(Msg: TMessage); message CM_MOUSELEAVE;
published
{ Published declarations }
property onMouseEnter: TNotifyEvent read fOnMouseEnter write fOnMouseEnter;
property onMouseLeave: TNotifyEvent read fOnMouseLeave write fOnMouseLeave;

Или что-то здесь не так?

---

← →
MBo ©   (2002-11-12 07:33) [3]

да.
http://www.swissdelphicenter.ch/en/showcode.php?id=1068

---

← →
theEnter   (2002-11-12 07:36) [4]

2MBo - thx за ссылку! :-)

---

← →
Song ©   (2002-11-12 08:56) [5]

Всего-то обработать TComponent.onMouseMove и больше ничего не надо..

---

← →
Tano ©   (2002-11-12 21:44) [6]

2Song: Не пойдет! Если даже не особо быстро перемещать мышь, то наблюдаются всякие артефакты (мышь ушла, а компонент все еще не в курсе событий :-)

---

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

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



Память: 0.46 MB
Время: 0.013 c