Функция InvertRect

Declare Function InvertRect Lib "user32" (ByVal hdc As Long, _
    lpRect As RECT) As Long

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

hdc

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

lpRect

Прямоугольник для инвертирования

Пример

' Инвертируем цвета в прямоугольнике (20,30) - (150,100) на окне Form1
Dim winrect As RECT  ' прямоугольник
Dim retval As Long  ' возвращаемое значение

retval = SetRect(winrect, 20, 30, 150, 100)   ' устанавливаем winrect в (20,30)-(150,100)
retval = InvertRect(Form1.hDC, winrect)   ' инвертируем пикселы в пределах прямоугольника

Смотри также

InvertRgn

Категория

Прямоугольники