CursorPosition: IGxPoint;
Свойство CursorPosition возвращает точку, содержащую текущие экранные координаты курсора мыши.
Используется только в настольном приложении.
Для выполнения примера предполагается наличие формы и расположенной на ней кнопки.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
CurPosition: IGxPoint;
Begin
CurPosition := WinApplication.CursorPosition;
Self.Text := CurPosition.X.ToString + " | " + CurPosition.Y.ToString;
End Sub Button1OnClick;
При нажатии на кнопку в заголовок формы будут выведены текущие экранные координаты курсора мыши.
См. также: