Class TDRLabel (unit DrLabel)

Inherits from

TLabel

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure Paint;


procedure FTimerOnTimer(sender:TObject);

Draw the text in original position

procedure SetBlink(Value: TDRBlink);


procedure SetBorder(Value: TDRBorder);


procedure SetCtl3D(Value: boolean);


procedure SetDeep(Value: byte);


procedure SetHiColor(value: TColor);


procedure SetInterval(Value: integer);


procedure SetLoColor(value: TColor);


procedure SetShadowColor(Value: TColor);


Properties

property Blink : TDRBlink


property BlinkInterval : integer

speed of blinking

property Border : TDRBorder


property Ctl3D : boolean


property Deep : byte


property HiColor : TColor

Hi Color, when "Blink" is blHiLo

property LoColor : TColor

Lo Color, when "Blink" is blHiLo

property ShadowColor : TColor


Events

Variables

FBlink : TDRBlink;

Blink interval in miliseconds

FBorder : TDRBorder;

Shadow deep

FCtl3D : boolean;

save old font color

FDeep : byte;

use 3D effects when true

FFontColor : TColor;

used when "Blink" is blHiLo

FHiColor : TColor;


FInterval : integer;


FLoColor : TColor;

used when "Blink" is blHiLo

FShadowColor : TColor;


FTimer : TTimer;



Constructors


constructor Create(AOwner: TComponent);


Functions


procedure Paint;


procedure FTimerOnTimer(sender:TObject);

Draw the text in original position


procedure SetBlink(Value: TDRBlink);


procedure SetBorder(Value: TDRBorder);


procedure SetCtl3D(Value: boolean);


procedure SetDeep(Value: byte);


procedure SetHiColor(value: TColor);


procedure SetInterval(Value: integer);


procedure SetLoColor(value: TColor);


procedure SetShadowColor(Value: TColor);


Properties


property Blink : TDRBlink


property BlinkInterval : integer

speed of blinking


property Border : TDRBorder


property Ctl3D : boolean


property Deep : byte


property HiColor : TColor

Hi Color, when "Blink" is blHiLo


property LoColor : TColor

Lo Color, when "Blink" is blHiLo


property ShadowColor : TColor


Events


Variables


FBlink : TDRBlink;

Blink interval in miliseconds


FBorder : TDRBorder;

Shadow deep


FCtl3D : boolean;

save old font color


FDeep : byte;

use 3D effects when true


FFontColor : TColor;

used when "Blink" is blHiLo


FHiColor : TColor;


FInterval : integer;


FLoColor : TColor;

used when "Blink" is blHiLo


FShadowColor : TColor;


FTimer : TTimer;