Функция FrameRgn

Declare Function FrameRgn Lib "gdi32.dll" (ByVal hdc As Long, ByVal hRgn As Long, ByVal hBrush As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long

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

FrameRgn рисует рамку (границу) вокруг данной области на устройстве, используя указанную кисть.Текущая кисть устройства не используется. Ширина и высота рамки также определяются функцией. Функция возвращает 0 в случае ошибки, или ненулевое значение в успешном случае.

hdc
Контекст устройства
hRgn
Дескриптор региона для рисования рамки.
hBrush
Дескриптор кисти, используемой для рисования рамки.
nWidth
Ширина в пикселах вертикальных штрихов кисти.
nHeight
Высота в пикселах горизонтальных штрихов кисти.

Пример:

' Рисуем рамку вокруг эллипса на форме Form1.  Рамка имеет
' ширину в 5 и высоту в 3 пиксела.  Область ограничена прямоугольником (20,30)-(220,180).
' Используется зеленая диагонально-заштрихованная кисть
Dim hRgn As Long  ' дескриптор региона для рамки
Dim hBrush As Long  ' дескриптор для кисти
Dim retval As Long  ' возвращаемое значение

' Создаем эллипс и кисть.
hRgn = CreateEllipticRgn(20, 30, 220, 180)  
hBrush = CreateHatchBrush(HS_DIAGCROSS, RGB(0, 255, 0))  

' Рамка для региона,используя созданную кисть.
retval = FrameRgn(Form1.hDC, hRgn, hBrush, 5, 3)  

' Удаляем регион и кисть для освобождения ресурсов.
retval = DeleteObject(hRgn)
retval = DeleteObject(hBrush)

Схожие функции: FillRgn, FrameRect
Категория: Регионы

В начало.

Shenko Photography, семейная пара фотографов в Мексике
photoexotica.ru