![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Мышь
Exploit © (2005-12-17 21:53:00)Удалено модератором
Примечание: СПАМ
Exploit (2005-12-17 23:11:00) [1]Огромное спасибо все работает.
Fenik (2005-12-17 23:06:00) [2]Ну и замечательно :)
Exploit (2005-12-17 23:03:00) [3]Вот это определяет глобальные координаты:
x1:=MyMouse.CursorPos.x;
y1:=MyMouse.CursorPos.y;
С помощью GetCursorPos получается тоже самое.
Fenik (2005-12-17 23:02:00) [4]procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var P: TPoint;
begin
GetCursorPos(P);
P := ScreenToClient(P);
Caption := Format('x - %d, y - %d', [P.x, P.y]);
end;
Fenik (2005-12-17 22:57:00) [5]Как пробовал и что не получается? Подробно в справке.
Exploit (2005-12-17 22:52:00) [6]Да видел, это вроде не то, пробывал не получается, вот тока про преобразования координат можно по подробнее
Fenik (2005-12-17 22:46:00) [7]Первый ответ видел?
Exploit (2005-12-17 22:38:00) [8]Help, как определить локальные мыши координаты на форме, знаю есть функиция но найти ее не могу
Exploit (2005-12-17 22:37:00) [9]Help, как определить локальные координаты на форме, знаю есть функция но не могу найти
Fenik (2005-12-17 22:17:00) [10]Exploit спрашивал, как определить локальные координаты мыши на форме.
app (2005-12-17 22:15:00) [11]Exploit © (17.12.05 21:53)
Прошу прощения, удалил по ошибке, просьба повторить вопрос.
Fenik (2005-12-17 22:08:00) [12]GetCursorPos вроде бы
и ScreenToClient - для преобразования координат.