Class TNetGradient (unit NetGradient) |
Inherits from
TGraphicControl
constructor Create(AOwner: TComponent);
- TNetGradient } { Override the constructor to initialize variables
procedure Paint;
Perform the fill when paint is called
procedure GradientFill;
Fill procedure Gradient fill procedure - the actual routine
procedure SetAutoSize(Value: Boolean);
Repaint the screen upon a resize
procedure SetBeginColor(Value: TColor);
Set begin color when property is changed
procedure SetCaption(Value: String);
Set the Caption on NG
procedure SetEndColor(Value: TColor);
Set end color when property is changed
procedure SetFillDirection(Value: TFillDirection);
Procedures for setting property values Set the fill direction
procedure SetFont(AFont: TFont);
Set the Font
procedure SetNumberOfColors(Value: TNumberOfColors);
Set the number of colors to be used in the fill
procedure SetTextLeft(Value: Integer);
Set the Position of the Caption (Left
procedure SetTextTop(Value: Integer);
Set the Position of the Caption (Top
property Align :
property AutoSize : Boolean
Repaint when autosized
property BeginColor : TColor
Starting color of fill
property Caption : String
property DragCursor :
property DragMode :
property Enabled :
property EndColor : TColor
Ending color of fill
property FillDirection : TFillDirection
Direction of fill
property Font : TFont
Enable standard properties
property NumberOfColors : TNumberOfColors
Number of colors to use in the fill (1 - 256) - default is 255.
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TextLeft : Integer
property TextTop : Integer
property Visible :
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
FAutoSize : Boolean;
FBeginColor : TColor;
FCaption : String;
FCenter : Boolean;
FDirection : TFillDirection;
Variables for properties
FEndColor : TColor;
FFont : TFont;
FNumberOfColors : TNumberOfColors;
FTextLeft : Integer;
FTextTop : Integer;
constructor Create(AOwner: TComponent);
TNetGradient } { Override the constructor to initialize variables
procedure Paint;
Perform the fill when paint is called
procedure GradientFill;
Fill procedure
Gradient fill procedure - the actual routine
procedure SetAutoSize(Value: Boolean);
Repaint the screen upon a resize
procedure SetBeginColor(Value: TColor);
Set begin color when property is changed
procedure SetCaption(Value: String);
Set the Caption on NG
procedure SetEndColor(Value: TColor);
Set end color when property is changed
procedure SetFillDirection(Value: TFillDirection);
Procedures for setting property values
Set the fill direction
procedure SetFont(AFont: TFont);
Set the Font
procedure SetNumberOfColors(Value: TNumberOfColors);
Set the number of colors to be used in the fill
procedure SetTextLeft(Value: Integer);
Set the Position of the Caption (Left
procedure SetTextTop(Value: Integer);
Set the Position of the Caption (Top
property Align :
property AutoSize : Boolean
Repaint when autosized
property BeginColor : TColor
Starting color of fill
property Caption : String
property DragCursor :
property DragMode :
property Enabled :
property EndColor : TColor
Ending color of fill
property FillDirection : TFillDirection
Direction of fill
property Font : TFont
Enable standard properties
property NumberOfColors : TNumberOfColors
Number of colors to use in the fill (1 - 256) - default is 255. If 1 } { then it uses the Begin Color.
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TextLeft : Integer
property TextTop : Integer
property Visible :
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
FAutoSize : Boolean;
FBeginColor : TColor;
FCaption : String;
FCenter : Boolean;
FDirection : TFillDirection;
Variables for properties
FEndColor : TColor;
FFont : TFont;
FNumberOfColors : TNumberOfColors;
FTextLeft : Integer;
FTextTop : Integer;