Координаты мыши относительно Top-Left формы?

← →
Glex © (2006-01-10 23:19) [0]

Как узнать?

← →
Gero © (2006-01-10 23:26) [1]

TForm.ScreenToClient

← →
EvS (2006-01-10 23:28) [2]

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin

end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin

end;

procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin

end;

x,y - координаты курсора
Координаты самой мыши определить невозможно.

← →
Gero © (2006-01-10 23:33) [3]

> Координаты самой мыши определить невозможно.

Можно, но не всегда и с довольно малой точностью.

← →
msguns © (2006-01-11 09:23) [4]

>Gero © (10.01.06 23:33) [3]
>Можно, но не всегда и с довольно малой точностью.

Уверен ?

> msguns © (11.01.06 09:23)
> Уверен ?

Конечно. А делается это элеменатрно: задав об этом вопрос пользователю.
Чтобы заставить его ответить, можно пребегнуть к разным средствам, я не стану их называть. Конечно, отвечать он захочет не всегда и точность ответа будет низкой, но я об этом сразу и сказал.

Координаты мыши относительно Top-Left формы? Найти похожие ветки