Главная страница
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.034 c
1-70278
wwwasya
2003-05-12 17:35
2003.05.22
Application.CreateForm vs TForm.Create


7-70538
___ALex___
2003-03-24 18:12
2003.05.22
System Tray


1-70238
boroda
2003-05-11 17:25
2003.05.22
TListView & TTreeView в одном.


3-70091
KAA1971
2003-05-03 14:14
2003.05.22
insert into table2 select * from table1


1-70326
Viktor
2003-05-07 11:51
2003.05.22
Модальные формы и данные