Class TGradient (unit DPGradnt)

Inherits from

TGraphicControl

Constructors


constructor Create(AComponent: TComponent);



Functions

procedure Loaded;

this is to set left-right or up-down

procedure Paint;

is going to completely redraw itself anyway.

procedure LoadColors ;


procedure SetBackColor(v : TColor);

set the direction to reverse or normal

procedure SetDirection(v : TGradDirection) ;


procedure SetFrontColor(v : TColor) ;


procedure SetSwapDirection(v : Boolean) ;

fix the end colour

procedure WMEraseBkgnd(var Message: TWMEraseBkgnd);

precalculated Brush.

Properties

property ColorEnd : TColor


property ColorStart : TColor


property Direction : TGradDirection


property Swap : Boolean


Events

Variables

FBackColor : TColor ;


FBC : array[0..255] of Longint;


FDirection : TGradDirection ;


FFrontColor : TColor;


FSwapDirection : Boolean ;



Constructors


constructor Create(AComponent: TComponent);


Functions


procedure Loaded;

this is to set left-right or up-down


procedure Paint;

is going to completely redraw itself anyway.


procedure LoadColors ;


procedure SetBackColor(v : TColor);

set the direction to reverse or normal


procedure SetDirection(v : TGradDirection) ;


procedure SetFrontColor(v : TColor) ;


procedure SetSwapDirection(v : Boolean) ;

fix the end colour


procedure WMEraseBkgnd(var Message: TWMEraseBkgnd);

precalculated Brush.Colors


Properties


property ColorEnd : TColor


property ColorStart : TColor


property Direction : TGradDirection


property Swap : Boolean


Events


Variables


FBackColor : TColor ;


FBC : array[0..255] of Longint;


FDirection : TGradDirection ;


FFrontColor : TColor;


FSwapDirection : Boolean ;