Class TpsiProgressBar (unit psiProgressBar) |
Inherits from
TGraphicControl
var} {type
constructor Create(AOwner: TComponent);
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);
===================================================================
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
event OnPaint : TNotifyEvent
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;
constructor Create(AOwner: TComponent);
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);
===================================================================
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
event OnPaint : TNotifyEvent
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;