Функция ClientToScreen

Declare Function ClientToScreen Lib "user32" (ByVal hwnd As Long, lpPoint As POINTAPI) As Long

ScreenToClient конвертирует клиентские координаты заданной точки в экранные координаты.

hwnd

Описатель окна, определяющего используемую клиентскую систему координат

lpPoint

Структура POINTAPI с клиентскими координатами точки. При вызове функции структура заполняется экранными координатами

Пример

' Узнаем экранные координаты кнопки Command1
Dim pc As POINTAPI
ClientToScreen Me.hwnd, pc
Print pc.x; pc.y

Смотри также

ScreenToClient

Категория

Координаты окна

Реклама