AggPas - Anti-Grain Geomertry for Object Pascal

TAgg2D.FillColor(c)
TAgg2D.FillColor(r, g, b, a)

Description

Changes the color used to fill interior of objects being drawn.

Default fill color is White (r: 255; r: 255; b: 255; a: 255).

Fill color doesn't apply if fill gradient is in place.

Parameters

c: TAggColor [*]

Fill color in one data structure (r, g, b, a).

r: byte

Red channel of Fill color [0..255].

g: byte

Green channel of Fill color [0..255].

b: byte

Blue channel of Fill color [0..255].

a: byte = 255 (Opaque)

Alpha transparency of Fill color [(transparent) 0..255 (opaque)].

Example

if VG.Attach(Image1.Picture.Bitmap) then begin

  VG.ClearAll(255, 255, 255);

  // Changing fill color to HTML color Gold #FFD700
  VG.FillColor($FF, $D7, $00);
  VG.Rectangle(30, 30, 180, 80);

  // Adding Alpha Transparency to previous fill color
  VG.Translate(0, 80);
  VG.FillColor($FF, $D7, $00, 128);
  VG.Rectangle(30, 30, 180, 80);

end;

Screenshot: FillColor example