| Class TMDHProgress (unit Prgrss) |
TCustomControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure Nudge;
procedure Paint;
procedure TimerComplete(sender: TObject);
procedure DrawStripe(i: integer);
procedure SetProgressBackColor(value: TColor);
procedure SetProgressForeColor(value: TColor);
procedure SetProgressInterval(value: word);
procedure SetProgressStatus(value: TProgressStatus);| Properties |
property BackColor : TColor
property ForeColor : TColor
property Interval : word
property Status : TProgressStatus| Events |
| Variables |
NudgeCounter : word;
FProgressActive : Boolean;
FProgressBackColor : TColor;
FProgressCurrent : integer;
FProgressForeColor : TColor;
FProgressInterval : word;
FProgressStatus : TProgressStatus;
FProgressTimer : TTimer;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;set defaults
procedure Nudge;
procedure Paint;
procedure TimerComplete(sender: TObject);
procedure DrawStripe(i: integer);
procedure SetProgressBackColor(value: TColor);
procedure SetProgressForeColor(value: TColor);with
procedure SetProgressInterval(value: word);
procedure SetProgressStatus(value: TProgressStatus);| Properties |
property BackColor : TColor
property ForeColor : TColor
property Interval : word
property Status : TProgressStatus| Events |
| Variables |
NudgeCounter : word;
FProgressActive : Boolean;
FProgressBackColor : TColor;
FProgressCurrent : integer;
FProgressForeColor : TColor;
FProgressInterval : word;
FProgressStatus : TProgressStatus;Private declarations
FProgressTimer : TTimer;