object Form1: TForm1 Left = 347 Height = 240 Top = 148 Width = 529 AutoSize = True Caption = 'LEDNumber demo' ClientHeight = 240 ClientWidth = 529 OnCreate = FormCreate LCLVersion = '2.1.0.0' object Panel1: TPanel Left = 0 Height = 55 Top = 0 Width = 529 Align = alTop AutoSize = True BevelOuter = bvNone ClientHeight = 55 ClientWidth = 529 TabOrder = 0 object lblCaption: TLabel AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = edCaption AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 12 Width = 42 BorderSpacing.Left = 8 Caption = 'Caption' ParentColor = False end object edCaption: TEdit AnchorSideLeft.Control = lblCaption AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Panel1 Left = 62 Height = 23 Top = 8 Width = 132 BorderSpacing.Left = 12 BorderSpacing.Top = 8 OnChange = edCaptionChange TabOrder = 0 Text = '-0.1234' end object cbZeroToO: TCheckBox AnchorSideLeft.Control = edCaption AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edCaption AnchorSideTop.Side = asrCenter Left = 218 Height = 19 Top = 10 Width = 120 BorderSpacing.Left = 24 BorderSpacing.Right = 8 Caption = 'Replace zero by ''O''' OnChange = cbZeroToOChange TabOrder = 1 end object cbSlanted: TCheckBox AnchorSideLeft.Control = cbZeroToO AnchorSideTop.Control = sbSize AnchorSideTop.Side = asrCenter Left = 218 Height = 19 Top = 36 Width = 59 Caption = 'Slanted' OnChange = cbSlantedChange TabOrder = 2 end object lblSize: TLabel AnchorSideLeft.Control = lblCaption AnchorSideTop.Control = sbSize AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 38 Width = 20 Caption = 'Size' ParentColor = False end object sbSize: TScrollBar AnchorSideLeft.Control = edCaption AnchorSideTop.Control = edCaption AnchorSideTop.Side = asrBottom AnchorSideRight.Control = edCaption AnchorSideRight.Side = asrBottom Left = 62 Height = 17 Top = 37 Width = 132 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 6 Max = 5 Min = 2 PageSize = 0 Position = 2 TabOrder = 3 OnChange = sbSizeChange end end object LEDNumber1: TLEDNumber AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Bevel1 AnchorSideTop.Side = asrBottom Left = 8 Height = 30 Top = 78 Width = 170 BorderSpacing.Left = 8 BorderSpacing.Top = 12 BorderSpacing.Right = 12 BorderSpacing.Bottom = 12 Caption = 'LEDNumber1' end object Bevel1: TBevel AnchorSideLeft.Control = Owner AnchorSideTop.Control = Panel1 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 8 Height = 3 Top = 63 Width = 513 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 8 BorderSpacing.Top = 8 BorderSpacing.Right = 8 Shape = bsBottomLine end end