| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Снять координаты курсора
alexdn © (2011-07-20 02:33:00)Нужно снять координаты курсора,
GetCursorPos(foo);
ShowMessage('(' + IntToStr(foo.X) + ' ,' + IntToStr(foo.Y) + ')');
нужно по двойному/одинарному клику мышки на рабочем столе, но что то не соображу к какому событию это привязать..
ixen (2011-07-22 12:34:00) [1]Unit
Controls(Windows-only components) or QFormss(cross-platform)
Category
mouse handling utilities
Delphi syntax:
var Mouse: TMouse;
C++ syntax:
extern PACKAGE TMouse* Mouse;
Description
Use Mouse to get information about the system’s mouse, including which window (if any) has captured the mouse, the position of the mouse, and mouse settings from the Control panel. Mouse can also be used to specify global aspects of how your application responds to mouse messages, such as how much the user must move the mouse to start a drag operation.
alexdn (2011-07-20 12:37:00) [2]> MonoLife © (20.07.11 07:11) [5]
Да, нужно SetWindowsHook, параметр WH_MOUSE, сейчас буду рыть..
MonoLife (2011-07-20 07:11:00) [3]
> клику мышки на рабочем столе
> ...если делаешь onMouseDown..
имхо, к форме, наверное, уже не привяжешь..
мож, хук на мышу?
alexdn (2011-07-20 03:22:00) [4]т.е. к какому событию мне привязаться..? может немножко торможу, просто впервые такая ситуация..
alexdn (2011-07-20 03:20:00) [5]> Andy BitOff © (20.07.11 03:00) [2]
да, делаешь так
ClientToScreen(foo);
ShowMessage('(' + IntToStr(foo.X) + ' ,' + IntToStr(foo.Y) + ')');
выдаёт уже координаты абсолютные, но опять же если делаешь onMouseDown, то выдаёт только по клику на форме..
Andy BitOff (2011-07-20 03:00:00) [6]Преобразовать. Чего-там ClientToScreen, ScreenToClient и иже с ними
alexdn (2011-07-20 02:54:00) [7]т.е. если делаешь onMouseDown то это идёт как TForm1.FormMouseDown, т.е. снимаются координаты именно курсора на форме.. как бы отвязаться, чтобы снять именно произвольные координаты с рабочего стола..
| |
