Функция SetRect

Declare Function SetRect Lib "user32.dll" (lpRect As RECT, ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long

Платформа: Win 95/98, Win NT

SetRect устанавливает позицию и размер прямоугольника. Две координаты указывают на левые верхние и нижние правые углы прямоугольника. Функция возвращает 0 в случае ошибки или 1в успешном случае.

lpRect
Прямоугольник, чтобы установить позицию и размер.
X1
Координата x левого верхнего угла прямоугольника.
Y1
Координата y левого верхнего угла прямоугольника.
X2
Координата x нижнего правого угла прямоугольника.
Y2
Координата y нижнего правого угла прямоугольника.

Пример:

' Устанавливает прямоугольник r
'Использование этой функции более эффективно и берет меньшее количество участка памяти чем 
'установка прямоугольника по четырем координатам.
Dim r As RECT  ' прямоугольник
Dim retval As Long  ' возвращаемое значение

retval = SetRect(r, 20, 30, 100, 50) 
Схожие функции: SetRectEmpty
Категория: Прямоугольники

В начало.