object DigitSetEditorForm: TDigitSetEditorForm Left = 668 Height = 240 Top = 144 Width = 320 BorderStyle = bsDialog Caption = 'DigitSetEditorForm' ClientHeight = 240 ClientWidth = 320 KeyPreview = True OnActivate = FormActivate OnKeyPress = FormKeyPress OnShow = FormShow LCLVersion = '2.1.0.0' object DigitCG: TCheckGroup Left = 16 Height = 89 Top = 16 Width = 136 AutoFill = True Caption = 'Digits' ChildSizing.LeftRightSpacing = 6 ChildSizing.TopBottomSpacing = 6 ChildSizing.VerticalSpacing = 6 ChildSizing.EnlargeHorizontal = crsScaleChilds ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 3 ClientHeight = 69 ClientWidth = 132 Columns = 3 Items.Strings = ( '1' '2' '3' '4' '5' '6' '7' '8' '9' ) OnItemClick = DigitCGItemClick ParentBiDiMode = False TabOrder = 0 Data = { 09000000020202020202020202 } end object btnOK: TButton AnchorSideLeft.Control = DigitCG AnchorSideRight.Control = DigitCG AnchorSideRight.Side = asrBottom Left = 16 Height = 25 Top = 112 Width = 136 Anchors = [akTop, akLeft, akRight] Caption = '&Ok' Default = True ModalResult = 1 TabOrder = 1 end end