IGxGraphics.FillColorRectangle

Синтаксис

FillColorRectangle(Color: IGxColor; Rect: IGxRect);

Параметры

Color. Цвет, которым будет залит прямоугольник.

Rect. Целочисленный прямоугольник.

Описание

Метод FillColorRectangle заливает целочисленный прямоугольник цветом, передаваемым посредством параметра Color.

Пример Fore

Для выполнения примера предполагается наличие формы, где расположены: кнопка с наименованием «Button1», компонент ImageBox с наименованием «ImageBox1». Подключите системные сборки: Drawing, Forms.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Img: IGxBitmap;
    ImgColor: IGxColor;
    Graph: IGxGraphics;
    Rect: IGxRect;
    l, t, r, b: Integer;
Begin
    Img := GxBitmap.CreateNew(ImageBox1.ClientWidth, ImageBox1.ClientHeight, GxPixelFormat.Format32bppArgb);
    ImgColor := GxColor.FromValue(Math.RandBetweenI(0, Integer.MaxValue));
    l := Math.RandBetweenI(0, Double.RoundInt(ImageBox1.ClientWidth / 2));
    t := Math.RandBetweenI(0, Double.RoundInt(ImageBox1.ClientHeight / 2));
    r := Math.RandBetweenI(Double.RoundInt(ImageBox1.ClientWidth / 2), ImageBox1.ClientWidth);
    b := Math.RandBetweenI(Double.RoundInt(ImageBox1.ClientHeight / 2), ImageBox1.ClientHeight);
    Rect := New GxRect.Create(l, t, r, b);
    Graph := GxGraphicsClass.FromImage(Img);
    Graph.FillColorRectangle(ImgColor, Rect);
    ImageBox1.Image := Img;
End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку в компоненте ImageBox отобразится новое битовое изображение с прямоугольником случайного размера и цвета.

См. также:

IGxGraphics