Class TEllipticHint (unit Elihint)

Inherits from

TComponent

Constructors


constructor Create(AOwner:TComponent);

Public declarations


Functions

Procedure SetBrush(Value : TBrush);


procedure SetHintPauseTime(Value:Integer);

FHintColor := $0080FFFF;

Procedure SetPen(Value : TPen);


Properties

property Brush : TBrush


property FontColor : TColor


property HintPauseTime : Integer

Published declarations } { property HintColor : TColor read FHintColor write FHintColor default $0080FFFF;

property Pen : TPen


Events

Variables

FBrush : TBrush;


FFontColor : TColor;


FHintPauseTime : Integer;

Private declarations } { FHintColor : TColor;

FPen : TPen;



Constructors


constructor Create(AOwner:TComponent);

Public declarations


Functions


Procedure SetBrush(Value : TBrush);


procedure SetHintPauseTime(Value:Integer);

FHintColor := $0080FFFF;


Procedure SetPen(Value : TPen);


Properties


property Brush : TBrush


property FontColor : TColor


property HintPauseTime : Integer

Published declarations } { property HintColor : TColor read FHintColor write FHintColor default $0080FFFF;


property Pen : TPen


Events


Variables


FBrush : TBrush;


FFontColor : TColor;


FHintPauseTime : Integer;

Private declarations } { FHintColor : TColor;


FPen : TPen;