object Form1: TForm1 Left = 442 Height = 240 Top = 143 Width = 516 Caption = 'BC Real Numeric Keyboard' ClientHeight = 240 ClientWidth = 516 OnCreate = FormCreate LCLVersion = '1.7' object BCPanel1: TBCPanel Left = 0 Height = 240 Top = 0 Width = 516 Align = alClient Background.Color = clBtnFace Background.ColorOpacity = 255 Background.Gradient1.StartColor = clWhite Background.Gradient1.StartColorOpacity = 255 Background.Gradient1.DrawMode = dmSet Background.Gradient1.EndColor = 16119285 Background.Gradient1.EndColorOpacity = 255 Background.Gradient1.ColorCorrection = True Background.Gradient1.GradientType = gtLinear Background.Gradient1.Point1XPercent = 0 Background.Gradient1.Point1YPercent = 0 Background.Gradient1.Point2XPercent = 0 Background.Gradient1.Point2YPercent = 100 Background.Gradient1.Sinus = False Background.Gradient2.StartColor = 15722194 Background.Gradient2.StartColorOpacity = 255 Background.Gradient2.DrawMode = dmSet Background.Gradient2.EndColor = 13137169 Background.Gradient2.EndColorOpacity = 255 Background.Gradient2.ColorCorrection = True Background.Gradient2.GradientType = gtLinear Background.Gradient2.Point1XPercent = 0 Background.Gradient2.Point1YPercent = 0 Background.Gradient2.Point2XPercent = 0 Background.Gradient2.Point2YPercent = 100 Background.Gradient2.Sinus = False Background.Gradient1EndPercent = 100 Background.Style = bbsGradient BevelInner = bvNone BevelOuter = bvNone BevelWidth = 1 Border.Color = clBlack Border.ColorOpacity = 255 Border.LightColor = clWhite Border.LightOpacity = 255 Border.LightWidth = 0 Border.Style = bboNone Border.Width = 1 BorderBCStyle = bpsBorder FontEx.Color = clDefault FontEx.EndEllipsis = False FontEx.FontQuality = fqSystemClearType FontEx.Height = 0 FontEx.SingleLine = True FontEx.Shadow = False FontEx.ShadowColor = clBlack FontEx.ShadowColorOpacity = 255 FontEx.ShadowRadius = 5 FontEx.ShadowOffsetX = 5 FontEx.ShadowOffsetY = 5 FontEx.Style = [] FontEx.TextAlignment = bcaCenter FontEx.WordBreak = False Rounding.RoundX = 1 Rounding.RoundY = 1 Rounding.RoundOptions = [] TabOrder = 0 OnClick = FormClick object FloatSpinEdit1: TFloatSpinEdit Left = 8 Height = 28 Top = 8 Width = 76 Increment = 1 MaxValue = 100000 MinValue = 0 OnClick = Button1Click TabOrder = 0 Value = 0 end object Edit1: TEdit Left = 96 Height = 28 Top = 8 Width = 80 OnClick = Button1Click TabOrder = 1 end end object BCRealNumericKeyboard1: TBCRealNumericKeyboard left = 128 top = 136 end end