DrawRubberRect procedure

In unit Grids

Draws a rubber banding rectangle.

Declaration

pascal

procedure DrawRubberRect(Canvas: TCanvas; aRect: TRect; Color: TColor; 
 DrawBits: Byte=BF_RECT)

Arguments

`Canvas`	Canvas where the rubber band rectangle is drawn.
`aRect`	Coordinates for the rubber band rectangle.
`Color`	Color for the rubber band rectangle.
`DrawBits`	Sides drawn for the rubber band rectangle.

Description

Draws a dotted rubber banding rectangle around the provided cell rectangle.

DrawBits contains a Byte value that indicates the rectangle sides drawn in the routine. By default, all sides for the rectangle are drawn. Use the following byte values OR-ed together in DrawBits to specify the sides drawn:

BF_LEFT: Draws the left side of the rectangle.
BF_RIGHT: Draws the right side of the rectangle.
BF_TOP: Draws the top of the rectangle.
BF_BOTTOM: Draws the bottom of the rectangle.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.