ProgressRect(TCanvas,TCanvasRect,Integer,Integer,Integer,Integer,TColors,Boolean,Integer,TRSShapeType,TRSShapeOrientation,Boolean,Integer,Integer,TProgressOrientation,TProgressDirection,TProgressDisplayType) Method |
Scroll Prev Top Next More |
Draws a rectangular progress bar using a gradient. Similar to a progress bar, either in vertical or horizontal orientation. Shapes are drawn up to the current progress position.
Namespace: RSGraphics
Delphi |
procedure ProgressRect(const Canvas: TCanvas; const CanvasR: TCanvasRect; |
Parameters
Canvas
Type: TCanvas
Canvas to paint on
CanvasR
Type: System.Void
Rectangle portion of the canvas to fill with the gradient
OuterPadding
Type: Integer
Amount in pixels the circle is less that the rectangle
Progress
Type: Integer
Amount of progress (between Min and Max)
Min
Type: Integer
Minimum value for the progress
Max
Type: Integer
Maximum value for the progress
Colors
Type: TColors
Gradient colors
AdjustPenColor
Type: Boolean
Adjust pen color or use pen supplied in canvas.
SubDivisions
Type: Integer
Number of subdivisions in the scale (<= Max)
SubShape
Type: TRSShapeType
Shape to draw on perimeter of progress area
SubShapeOrientation
Type: TRSShapeOrientation
Orientation of the subshapes
SubShapeBevel
Type: Boolean
Should subshapes be beveled or not
SubShapeBevelSize
Type: Integer
Size of bevel for subshapes
Spacing
Type: Integer
Space in pixels between subdivisions
Orientation
Type: TProgressOrientation
Orientation of the progress rectangle
Direction
Type: TProgressDirection
Direction progress circle grows towards
DisplayType
Type: TProgressDisplayType
Draw all progress or only current progress