| Class TNetGradient (unit NetGradient) |
TGraphicControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Paint;
procedure GradientFill;Gradient fill procedure - the actual routine
procedure SetAutoSize(Value: Boolean);
procedure SetBeginColor(Value: TColor);
procedure SetCaption(Value: String);
procedure SetEndColor(Value: TColor);
procedure SetFillDirection(Value: TFillDirection);Set the fill direction
procedure SetFont(AFont: TFont);
procedure SetNumberOfColors(Value: TNumberOfColors);
procedure SetTextLeft(Value: Integer);
procedure SetTextTop(Value: Integer);| Properties |
property Align :
property AutoSize : Boolean
property BeginColor : TColor
property Caption : String
property DragCursor :
property DragMode :
property Enabled :
property EndColor : TColor
property FillDirection : TFillDirection
property Font : TFont
property NumberOfColors : TNumberOfColors
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TextLeft : Integer
property TextTop : Integer
property Visible : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FAutoSize : Boolean;
FBeginColor : TColor;
FCaption : String;
FCenter : Boolean;
FDirection : TFillDirection;
FEndColor : TColor;
FFont : TFont;
FNumberOfColors : TNumberOfColors;
FTextLeft : Integer;
FTextTop : Integer;| Constructors |
constructor Create(AOwner: TComponent);TNetGradient } { Override the constructor to initialize variables
| Functions |
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
| Properties |
property Align :
property AutoSize : BooleanRepaint when autosized
property BeginColor : TColorStarting color of fill
property Caption : String
property DragCursor :
property DragMode :
property Enabled :
property EndColor : TColorEnding color of fill
property FillDirection : TFillDirectionDirection of fill
property Font : TFontEnable standard properties
property NumberOfColors : TNumberOfColorsNumber 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 : | Events |
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp : | Variables |
FAutoSize : Boolean;
FBeginColor : TColor;
FCaption : String;
FCenter : Boolean;
FDirection : TFillDirection;Variables for properties
FEndColor : TColor;
FFont : TFont;
FNumberOfColors : TNumberOfColors;
FTextLeft : Integer;
FTextTop : Integer;