object CheckInput: TCheckInput Left = 299 Top = 120 BorderIcons = [] BorderStyle = bsSingle Caption = 'Check Box' ClientHeight = 230 ClientWidth = 330 Font.Color = clWindowText Font.Height = -17 Font.Name = 'System' Font.Style = [] PixelsPerInch = 120 Position = poScreenCenter OnCloseQuery = FormCloseQuery TextHeight = 20 object Label1: TLabel Left = 79 Top = 20 Width = 50 Height = 20 Alignment = taRightJustify Caption = 'Name:' Font.Color = clBlue Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 21 Top = 70 Width = 108 Height = 20 Alignment = taRightJustify Caption = 'Return Value:' Font.Color = clBlue Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False end object Edit1: TEdit Left = 136 Top = 15 Width = 171 Height = 30 Color = clSilver Font.Color = clMaroon Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object Edit2: TEdit Left = 136 Top = 65 Width = 171 Height = 30 Color = clSilver Font.Color = clMaroon Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False TabOrder = 1 end object BitBtn1: TBitBtn Left = 24 Top = 168 Width = 111 Height = 41 TabOrder = 3 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 200 Top = 168 Width = 111 Height = 41 TabOrder = 4 OnClick = BitBtn2Click Kind = bkCancel end object CheckBox1: TCheckBox Left = 120 Top = 120 Width = 129 Height = 25 Caption = 'Checked' Font.Color = clBlue Font.Height = -17 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False TabOrder = 2 end end