Текущий архив: 2002.05.23;
Скачать: 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 вся ветка

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

Наверх

Память: 0.44 MB
Время: 0.006 c