Class TLedGroup (unit LedGroup)

Inherits from

TCustomGroupBox

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

procedure CreateDigits;


procedure Paint;

creates the led

procedure SetCaption(Caption:String);


procedure SetCommaPos(Position:Byte);


Procedure SetMargin (value:Byte);

for

procedure SetMaxDigits(Num:Byte);


procedure SetOffColor(color:TColor);

for

procedure SetOnColor(color:TColor);

for

Properties

property Caption : String


property Color :


property CommaPos : Byte


property Margin : Byte


property MaxDigits : Byte

Published declarations

property OffColor : TColor


property ShowHint :


Events

event OnColor : TColor


Variables

FCaption : String;


FCommaPos : Byte;


FMargin : Byte;


FMaxDigits : byte;

Private declarations

FOffColor : TColor;


FOnColor : TColor;


Led : TDigitLed;

Number of digits


Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


procedure CreateDigits;


procedure Paint;

creates the led


procedure SetCaption(Caption:String);


procedure SetCommaPos(Position:Byte);


Procedure SetMargin (value:Byte);

for


procedure SetMaxDigits(Num:Byte);


procedure SetOffColor(color:TColor);

for


procedure SetOnColor(color:TColor);

for


Properties


property Caption : String


property Color :


property CommaPos : Byte


property Margin : Byte


property MaxDigits : Byte

Published declarations


property OffColor : TColor


property ShowHint :


Events


event OnColor : TColor


Variables


FCaption : String;


FCommaPos : Byte;


FMargin : Byte;


FMaxDigits : byte;

Private declarations


FOffColor : TColor;


FOnColor : TColor;


Led : TDigitLed;

Number of digits