Функция InvertRgn

Declare Function InvertRgn Lib "gdi32" (ByVal hdc As Long, ByVal hRgn As Long) As Long

InvertRgn инвертирует цвета всех пикселов внутри области устройства. Инверсия пикселов рассчитывается с помощью двоичной операции NOT на значении RGB цвета каждого пиксела

hdc

Контекст устройства, чтобы инвертировать пикселы в пределах области

hRgn

Дескриптор области на устройстве для инвертирования

Пример

' Инвертируем пикселы в пределах  области эллипса на окне Form1
' Область имеет ограничительный прямоугольник (20,30) - (150,110)
Dim hrgn As Long  ' дескриптор области
Dim retval As Long  ' возвращаемое значение

' Создаем  область-эллипс, чтобы инвертировать и получить дескриптор
hrgn = CreateEllipticRgn(20,30,150,110) ' ограничительный прямоугольник (20,30)-(150,110)
' инвертируем эту область в окне Form1
retval = InvertRgn(Form1.hDC, hrgn)
' удаляем область для освобождения ресурсов системы
retval = DeleteObject(hrgn)

Смотри также

InvertRect

Категория

Регионы