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

Вниз

Как узнать что курсор мыши находится над компонентом?   Найти похожие ветки 

 
CAMOBAP ©   (2003-05-12 10:24) [0]

Пробовал сделать так, не работает:

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if (x>image1.Left)and(x<image1.Left+image1.Width)and
(y>image1.Top)and(y<image1.Top+image1.Height) Then
..........
end;


 
Шаман ©   (2003-05-12 10:40) [1]

OnMouseMove у image1 чем не подходит?


 
NAlexey ©   (2003-05-12 10:51) [2]

Наверное так.
PtInRect(Control.BoundsRect, Point(X, Y));


 
CAMOBAP ©   (2003-05-12 10:52) [3]

Хех, действительно, я туплю, спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
11-70193
Alexei Dragoner
2002-08-07 12:22
2003.05.22
Вот и Delphi 7.... Какие планы?


11-70192
tamerlan311
2002-08-13 17:15
2003.05.22
сообщения от мыши


3-70154
Belkova
2003-05-02 11:09
2003.05.22
Скролинг


3-70164
Skalp
2003-05-02 14:20
2003.05.22
Транзакция


8-70395
_rav
2003-02-09 15:33
2003.05.22
Как реализовать skin?