Fill custom area with color

delphi colors delphi-7 paint fill
Little Helper picture Little Helper · Nov 27, 2011 · Viewed 16.4k times · Source

How can I fill a selected area with color?

var Rect: TRect;
    Color: TColor;
begin
  //fill area with color
end;

Answer

David Heffernan picture David Heffernan · Nov 27, 2011

You have not stated what you mean by custom area and you talk about a "selected area". I don't know what you mean.

For a simple rectangle then you typically would fill the rectangle with TCanvas.FillRect.

Canvas.Brush.Style := bsSolid;
Canvas.Brush.Color := Color;
Canvas.FillRect(R);

where R is a TRect specifying the rectangle.

For a more complex region then you need to fall back on the Windows GDI function FillRgn. This function is not wrapped by TCanvas but you can simply call it passing TCanvas.Handle as the HDC.

Related questions

Custom Delphi Colours

If i want to set a colour property to something thats non-standard (i.e. not something like clBlack or clRed) how can i do this? Can i set something like hexadecimal colours?

Read More
Change DBGRID row color on field value in delphi

How to change color of dbgrid rows that have the same value on a field in delphi? for example all rows that have the same teacher note: those rows are grouped, and come after each other in dbgrid thanks in …

Read More
How to programmatically change the FontColor of a Tlabel

When I put a TLabel on a form, I can change the color of its text by changing the FontColor property. However, when I do this in my program by Label1.FontColor := TAlphaColors.Aquamarine; this doesn't work. Any idea what's …

Read More