Мышь - Общие вопросы Delphi

kl45gp · 16.06.2007, 17:22

Как узнать координаты мыши относительно panel??? зарание спасибо!

Carbon · 16.06.2007, 18:32

GetCursorPos, Panel.Left, Panel.Top, Form.Left, Form.Top.

kl45gp · 16.06.2007, 18:41

Чего-то я не понял...

Carbon · 16.06.2007, 18:55

Код:

var p,res:TPoint;
begin
  GetCursorPos(p);
  res.x:=p.x-Left-panel.Left;
  res.y:=p.y-Top-panel.Top;
end;

kl45gp · 16.06.2007, 19:12

Всё я понял... спасибо тебе!

zetrix · 16.06.2007, 19:45

Либо обрабатывать событие OnMouseMove у панели.

merax · 16.06.2007, 20:02

Цитата:

Сообщение от zetrix

Либо обрабатывать событие OnMouseMove у панели.

Самый лучший вариант! Упрощает код до минимума!

mutabor · 16.06.2007, 22:47

тем более что вариант с GetCursorPos(p) все равно надо либо на таймер, либо на движение мыши вешать - а тут он вообще не нужен так как процедура возвращает координаты x,y

16.06.2007, 17:22	#1
kl45gp Пользователь Регистрация: 28.03.2007 Сообщений: 25	Мышь Как узнать координаты мыши относительно panel??? зарание спасибо! ... если программист играет в игры на работе, то либо у него мало работы и большая зарплата, либо у него много работы и маленькая зарплата...

16.06.2007, 18:32	#2
Carbon JAVA BEAN Участник клуба Регистрация: 22.04.2007 Сообщений: 1,329	GetCursorPos, Panel.Left, Panel.Top, Form.Left, Form.Top. http://i.imgur.com/oCA5O.png

16.06.2007, 18:41	#3
kl45gp Пользователь Регистрация: 28.03.2007 Сообщений: 25	Чего-то я не понял... ... если программист играет в игры на работе, то либо у него мало работы и большая зарплата, либо у него много работы и маленькая зарплата...

16.06.2007, 18:55	#4
Carbon JAVA BEAN Участник клуба Регистрация: 22.04.2007 Сообщений: 1,329	Код: `var p,res:TPoint; begin GetCursorPos(p); res.x:=p.x-Left-panel.Left; res.y:=p.y-Top-panel.Top; end;` http://i.imgur.com/oCA5O.png

16.06.2007, 19:12	#5
kl45gp Пользователь Регистрация: 28.03.2007 Сообщений: 25	Всё я понял... спасибо тебе! ... если программист играет в игры на работе, то либо у него мало работы и большая зарплата, либо у него много работы и маленькая зарплата...

16.06.2007, 19:45	#6
zetrix Delphi/C++/C# Участник клуба Регистрация: 29.10.2006 Сообщений: 1,972	Либо обрабатывать событие OnMouseMove у панели.

16.06.2007, 22:47	#8
mutabor Телепат с дипломом Старожил Регистрация: 10.06.2007 Сообщений: 4,929	тем более что вариант с GetCursorPos(p) все равно надо либо на таймер, либо на движение мыши вешать - а тут он вообще не нужен так как процедура возвращает координаты x,y The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen) Проверь себя! Онлайн тестирование \| Мой блог

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Мышь	Михаил Юрьевич	Общие вопросы Delphi	8	09.06.2008 11:23
мышь в паскале.	Iceman	Паскаль, Turbo Pascal, PascalABC.NET	6	10.03.2008 14:50
Уматная мышь	Sibedir	Свободное общение	8	21.01.2008 15:27
мышь хвостатая...	Аlex	Win Api	14	18.01.2008 00:30
Мышь многокнопочная	NoName_emaNoN	Win Api	9	14.12.2007 14:31