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

Трей и мышка   Найти похожие ветки 

← →
DNT ©   (2002-03-24 11:57) [0]

У меня есть такой код:
Procedure TForm1.WndProc(Var Msg:TMessage);
Var P:TPoint;
Begin
If Msg.Msg=WM_USER+1
then Case Msg.lParam of
WM_LBUTTONDOWN :
begin

end

end ;
Inherited
End;


Он обрабатывает сообщения от иконки в трее.
Мне необходимо узнать координаты мышки в момент нажатия.
Я так понимаю, что нужно отдельно отлавливать WM_MOUSEMOVE и заносить координаты к переменные программы.
Подскажите плиз, как это сделать.


← →
SPeller ©   (2002-03-24 14:18) [1]

Попробуй в момент получения сообщения определить позицию курсора.


← →
Atrem   (2002-03-24 16:24) [2]

Узнать координаты мышки можно с помощью след.метода:
var t:tpoint;
begin
getcursorpos(t);
showmessage("x="+inttostr(t.x)+" y="+inttostr(t.y));


← →
DNT ©   (2002-03-24 17:42) [3]

Спасибо всем!



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

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



Память: 0.45 MB
Время: 0.015 c
4-73455
Mastak
2002-03-10 01:17
2002.05.23
Функция EnumCachedResources


1-73308
Durak
2002-05-12 06:33
2002.05.23
StringGrid


14-73353
LazorenkoX
2002-04-11 16:58
2002.05.23
DelphiX


1-73114
Anton_a
2002-05-12 16:00
2002.05.23
ini


3-73000
Turalyon
2002-04-25 13:36
2002.05.23
SQL Server 2k




   Наверх