Inherits from
TGraphicControl
constructor Create(AOwner: TComponent);
- Draw phong when Ctl3D and lsRndRect of lsRound.
destructor Destroy;
procedure Loaded;
procedure Paint;
procedure TimerTimer(Sender: TObject);
procedure SetAlignment(value: TMyAlignment);
procedure SetBorderStyle(value: TBorderStyle);
procedure SetBorderWidth(value: TBrdrWidth);
procedure SetCaption(value: TCaption);
procedure SetColor(index: integer; value: TColor);
procedure SetCtl3D(value: boolean);
procedure SetFont(value: TFont);
procedure SetInterval(value: TInterval);
procedure SetLedDimension(index: integer; value: TLedDimension);
procedure SetLedOn(value: boolean);
procedure SetLedShape(value: TLedShape);
procedure SetMargin(value: TMargin);
procedure SetPhongSize(value: TBrdrWidth);
property About : TAboutProperty
property Alignment : TMyAlignment
property BorderColor : TColor
property BorderStyle : TBorderStyle
property BorderWidth : TBrdrWidth
property Caption : TCaption
property Ctl3D : boolean
property Font : TFont
property Interval : TInterval
property LedHeight : TLedDimension
property LedOn : boolean
property LedShape : TLedShape
property LedWidth : TLedDimension
property Margin : TMargin
property OffColor : TColor
property PhongSize : TBrdrWidth
property ShowHint :
event OnChange : TOnOff
event OnColor : TColor
CaptionOrigin : TPoint;
FAbout : TAboutProperty;
FAlignment : TMyAlignment;
FBorderColor : TColor;
FBorderStyle : TBorderStyle;
FBorderWidth : TBrdrWidth;
FCaption : TCaption;
FCtl3D : boolean;
FFont : TFont;
FInterval : TInterval;
FLedHeight : TLedDimension;
FLedOn : boolean;
FLedShape : TLedShape;
FLedWidth : TLedDimension;
FMargin : TMargin;
FOffColor : TColor;
FOnColor : TColor;
FOnOff : TOnOff;
FPhongSize : TBrdrWidth;
FTimer : TTimer;
LedOrigin : TPoint;
LedRect : TRect;
constructor Create(AOwner: TComponent);
Draw phong when Ctl3D and lsRndRect of lsRound...
destructor Destroy;
procedure Loaded;
procedure Paint;
procedure TimerTimer(Sender: TObject);
procedure SetAlignment(value: TMyAlignment);
procedure SetBorderStyle(value: TBorderStyle);
procedure SetBorderWidth(value: TBrdrWidth);
procedure SetCaption(value: TCaption);
procedure SetColor(index: integer; value: TColor);
procedure SetCtl3D(value: boolean);
procedure SetFont(value: TFont);
procedure SetInterval(value: TInterval);
procedure SetLedDimension(index: integer; value: TLedDimension);
procedure SetLedOn(value: boolean);
procedure SetLedShape(value: TLedShape);
procedure SetMargin(value: TMargin);
procedure SetPhongSize(value: TBrdrWidth);
property About : TAboutProperty
property Alignment : TMyAlignment
property BorderColor : TColor
property BorderStyle : TBorderStyle
property BorderWidth : TBrdrWidth
property Caption : TCaption
property Ctl3D : boolean
property Font : TFont
property Interval : TInterval
property LedHeight : TLedDimension
property LedOn : boolean
property LedShape : TLedShape
property LedWidth : TLedDimension
property Margin : TMargin
property OffColor : TColor
property PhongSize : TBrdrWidth
property ShowHint :
event OnChange : TOnOff
event OnColor : TColor
CaptionOrigin : TPoint;
FAbout : TAboutProperty;
FAlignment : TMyAlignment;
FBorderColor : TColor;
FBorderStyle : TBorderStyle;
FBorderWidth : TBrdrWidth;
FCaption : TCaption;
FCtl3D : boolean;
FFont : TFont;
FInterval : TInterval;
FLedHeight : TLedDimension;
FLedOn : boolean;
FLedShape : TLedShape;
FLedWidth : TLedDimension;
FMargin : TMargin;
FOffColor : TColor;
FOnColor : TColor;
FOnOff : TOnOff;
FPhongSize : TBrdrWidth;
FTimer : TTimer;
LedOrigin : TPoint;
LedRect : TRect;