| Class TpsiProgressBar (unit psiProgressBar) |
TGraphicControl
var} {type
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Paint;
procedure PaintCaption;
procedure PaintMainPanel;
procedure PaintProgressBar;
procedure SetColor3DHighlight(Value: TColor);
procedure SetColor3DShadow(Value: TColor);
procedure SetColorBack(Value: TColor);
procedure SetColorBar(Value: TColor);
procedure SetFontCaption(Value: TFont);
procedure SetNumDone(Value: integer);
procedure SetNumTodo(Value: integer);
procedure SetProgress(Value: integer);| Properties |
property Color3DHighlight : TColor
property Color3DShadow : TColor
property ColorBack : TColor
property ColorBar : TColor
property FontCaption : TFont
property NumDone : integer
property NumTodo : integer
property Progress : integer
property Visible :
property Canvas :
property CaptionPanelWidth : Integer
property LastProgress : integer| Events |
event OnPaint : TNotifyEvent| Variables |
FBrush : TBrush;
FCaptionPanelWidth : Integer;
FColor3DHighlight : TColor;
FColor3DShadow : TColor;
FColorBack : TColor;
FColorBar : TColor;
FFontCaption : TFont;
FLastProgress : integer;
FNumDone : integer;
FNumTodo : integer;
FOnPaint : TNotifyEvent;
FPen : TPen;
FProgress : integer;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Paint;===================================================================
procedure PaintCaption;===================================================================
procedure PaintMainPanel;===================================================================
procedure PaintProgressBar;===================================================================
procedure SetColor3DHighlight(Value: TColor);===================================================================
procedure SetColor3DShadow(Value: TColor);===================================================================
procedure SetColorBack(Value: TColor);===================================================================
procedure SetColorBar(Value: TColor);===================================================================
procedure SetFontCaption(Value: TFont);===================================================================
procedure SetNumDone(Value: integer);===================================================================
procedure SetNumTodo(Value: integer);===================================================================
procedure SetProgress(Value: integer);===================================================================
| Properties |
property Color3DHighlight : TColor
property Color3DShadow : TColor
property ColorBack : TColor
property ColorBar : TColor
property FontCaption : TFont
property NumDone : integer
property NumTodo : integer
property Progress : integer
property Visible :
property Canvas :
property CaptionPanelWidth : Integer
property LastProgress : integer| Events |
event OnPaint : TNotifyEvent| Variables |
FBrush : TBrush;
FCaptionPanelWidth : Integer;
FColor3DHighlight : TColor;
FColor3DShadow : TColor;
FColorBack : TColor;
FColorBar : TColor;
FFontCaption : TFont;
FLastProgress : integer;
FNumDone : integer;
FNumTodo : integer;
FOnPaint : TNotifyEvent;
FPen : TPen;
FProgress : integer;