Unit 'BGRAFlashProgressBar' Package
[Overview][Types][Classes][Procedures and functions][Index] [#pl_bgracontrols]

TBGRAFlashProgressBar

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: bgraflashprogressbar.pas line 57

type TBGRAFlashProgressBar = class(TBGRAGraphicCtrl)

protected

  FBGRA: TBGRABitmap;

  

  FCaptionPercentDigits: Integer;

  

  FCaptionPercentTimerFormat: string;

  

  FCaptionShowPercent: Boolean;

  

  FCaptionPercentAlign: TAlignment;

  

  FCaptionPercentSubAlign: TAlignment;

  

  FCaptionShowPercentSub: Boolean;

  

  FMarqueeBounce: Word;

  

  FOnRedraw: TBGRAProgressBarRedrawEvent;

  

  FBackgroundColor: TColor;

  

  FBackgroundRandomize: Boolean;

  

  FBackgroundRandomizeMaxIntensity: Word;

  

  FBackgroundRandomizeMinIntensity: Word;

  

  FShowDividers: Boolean;

  

  FGraphShowYDividers: Boolean;

  

  FBarColor: TColor;

  

  FBarColorSub: TColor;

  

  FMarqueeWidthType: TBGRAPBarMarqueeWidthType;

  

  FMarqueeDirection: TBGRAPBarMarqueeDirection;

  

  FMarqueeSpeed: TBGRAPBarMarqueeSpeed;

  

  FMarqueeWidth: Word;

  

  rMarqueeWidth: Word;

  

  FOnTimerTimer: TNotifyEvent;

  

  FTimerAutoRestart: Boolean;

  

  FOnTimerEnd: TNotifyEvent;

  

  FOnTimerStart: TNotifyEvent;

  

  FTimerInterval: Cardinal;

  

  FMaxValue: Double;

  

  FMinValue: Double;

  

  FMinYValue: Double;

  

  FMaxYValue: Double;

  

  FValue: Double;

  

  FValueSub: Double;

  

  FOnChange: TNotifyEvent;

  

  FRandSeed: Integer;

  

  FStyle: TBGRAPBarStyle;

  

  FGraphShowYLine: Boolean;

  

  FGraphYLineAfter: string;

  

  FGraphYLineCaption: string;

  

  FGraphYLineDigits: Integer;

  

  FShowBarAnimation: Boolean;

  

  xpos: Integer;

  

  xposSub: Integer;

  

  marqueeLeft: Integer;

  

  marqueeRight: Integer;

  

  marqueeCount: Integer;

  

  marqueeBCount: Integer;

  

  barAnimLeft: Integer;

  

  marqueeWall: Boolean;

  

  marqueeBouncing: Boolean;

  

  marqueeCurMode: TBGRAPBarMarqueeDirection;

  

  internalTimer: TFPTimer;

  

  closing: Boolean;

  

  GraphValues: TGraphValues;

  

  GraphPoints: array of TPointF;

  

  class function GetControlClassDefaultSize; override;

  

  procedure CalculatePreferredSize(); override;

  

  procedure DoOnResize; override;

  

  procedure WMEraseBkgnd(); message;

  

  procedure Paint; override;

  

  procedure Loaded; override;

  

  procedure TextChanged; override;

  

  procedure TimerOnTimer();

  

  procedure CalcMarqueeWidth;

  

public

  constructor Create(); override;

  

  destructor Destroy; override;

  

  procedure SaveToFile();

  

  procedure LoadFromFile();

  

  procedure OnFindClass();

  

  procedure Draw();

  

  procedure SetValue();

  

  procedure StepIt();

  

  procedure TimerReStart;

  

  procedure TimerPlayPause;

  

  property Position: Integer; [rw]

  

  property Min: Integer; [rw]

  

  property Max: Integer; [rw]

  

  property XPosition: Integer; [r]

  

  property XPositionSub: Integer; [r]

  

published

  property Align;

  

  property BorderSpacing;

  

  property Anchors;

  

  property Caption;

  

  property CaptionShowPercent: Boolean; [rw]

  

  property CaptionPercentAlign: TAlignment; [rw]

  

  property CaptionShowPercentSub: Boolean; [rw]

  

  property CaptionPercentSubAlign: TAlignment; [rw]

  

  property CaptionPercentDigits: Integer; [rw]

  

  property CaptionPercentTimerFormat: string; [rw]

  

  property Font;

  

  property ParentFont;

  

  property MinValue: Double; [rw]

  

  property MaxValue: Double; [rw]

  

  property MinYValue: Double; [rw]

  

  property MaxYValue: Double; [rw]

  

  property Value: Double; [rw]

  

  property ValueSub: Double; [rw]

  

  property Color; deprecated ;

  

  property RandSeed: Integer; [rw]

  

  property BarColor: TColor; [rw]

  

  property BarColorSub: TColor; [rw]

  

  property BackgroundColor: TColor; [rw]

  

  property BackgroundRandomizeMinIntensity: Word; [rw]

  

  property BackgroundRandomizeMaxIntensity: Word; [rw]

  

  property BackgroundRandomize: Boolean; [rw]

  

  property ShowDividers: Boolean; [rw]

  

  property ShowBarAnimation: Boolean; [rw]

  

  property Style: TBGRAPBarStyle; [rw]

  

  property MarqueeWidthType: TBGRAPBarMarqueeWidthType; [rw]

  

  property MarqueeWidth: Word; [rw]

  

  property MarqueeSpeed: TBGRAPBarMarqueeSpeed; [rw]

  

  property MarqueeDirection: TBGRAPBarMarqueeDirection; [rw]

  

  property MarqueeBounce: Word; [rw]

  

  property TimerInterval: Cardinal; [rw]

  

  property TimerAutoRestart: Boolean; [rw]

  

  property GraphShowYDividers: Boolean; [rw]

  

  property GraphShowYLine: Boolean; [rw]

  

  property GraphYLineCaption: string; [rw]

  

  property GraphYLineAfter: string; [rw]

  

  property GraphYLineDigits: Integer; [rw]

  

  property OnClick;

  

  property OnMouseDown;

  

  property OnMouseEnter;

  

  property OnMouseLeave;

  

  property OnMouseMove;

  

  property OnMouseUp;

  

  property OnMouseWheel;

  

  property OnMouseWheelUp;

  

  property OnMouseWheelDown;

  

  property OnChange: TNotifyEvent; [rw]

  

  property OnRedraw: TBGRAProgressBarRedrawEvent; [rw]

  

  property OnTimerStart: TNotifyEvent; [rw]

  

  property OnTimerEnd: TNotifyEvent; [rw]

  

  property OnTimerTimer: TNotifyEvent; [rw]

  

end;

Inheritance

TBGRAFlashProgressBar

  

|

TBGRAGraphicCtrl

  

|

TObject



CT Web help

CodeTyphon Studio