object frmEditFormat: TfrmEditFormat Left = 583 Height = 189 Top = 339 Width = 320 HorzScrollBar.Page = 328 VertScrollBar.Page = 188 AutoSize = True BorderStyle = bsDialog Caption = 'Edit Format' ClientHeight = 189 ClientWidth = 320 OnCreate = FormCreate OnShow = FormShow Position = poScreenCenter LCLVersion = '2.3.0.0' object Panel1: TPanel Left = 8 Height = 148 Top = 8 Width = 304 Align = alClient AutoSize = True BorderSpacing.Left = 8 BorderSpacing.Top = 8 BorderSpacing.Right = 8 BevelOuter = bvNone ClientHeight = 148 ClientWidth = 304 TabOrder = 0 object LblName: TLabel AnchorSideTop.Control = edName AnchorSideTop.Side = asrCenter AnchorSideRight.Control = edName Left = 50 Height = 15 Top = 4 Width = 38 Anchors = [akTop, akRight] BorderSpacing.Left = 8 BorderSpacing.Right = 8 Caption = 'Name: ' FocusControl = edName ParentColor = False end object LblIncrement: TLabel AnchorSideTop.Control = edIncrement AnchorSideTop.Side = asrCenter AnchorSideRight.Control = edIncrement Left = 8 Height = 15 Top = 66 Width = 80 Anchors = [akTop, akRight] BorderSpacing.Left = 8 BorderSpacing.Right = 8 Caption = 'Day Increment:' FocusControl = edIncrement ParentColor = False end object LblDescription: TLabel AnchorSideTop.Control = edDescription AnchorSideTop.Side = asrCenter AnchorSideRight.Control = edDescription Left = 22 Height = 15 Top = 35 Width = 66 Anchors = [akTop, akRight] BorderSpacing.Left = 8 BorderSpacing.Right = 8 Caption = 'Description: ' FocusControl = edDescription ParentColor = False end object edDescription: TEdit AnchorSideLeft.Control = edName AnchorSideTop.Control = edName AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 96 Height = 23 Top = 31 Width = 208 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 8 TabOrder = 0 end object edIncrement: TEdit AnchorSideLeft.Control = edName AnchorSideTop.Control = edDescription AnchorSideTop.Side = asrBottom Left = 96 Height = 23 Top = 62 Width = 71 Alignment = taRightJustify BorderSpacing.Top = 8 TabOrder = 1 Text = '0' end object udIncrement: TUpDown AnchorSideLeft.Control = edIncrement AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edIncrement AnchorSideTop.Side = asrCenter AnchorSideRight.Side = asrBottom Left = 167 Height = 23 Top = 62 Width = 12 Associate = edIncrement Max = 365 Min = 0 Position = 0 TabOrder = 2 end object edName: TEdit AnchorSideTop.Control = Panel1 AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 96 Height = 23 Top = 0 Width = 208 Anchors = [akTop, akRight] TabOrder = 3 end object rgDayIncrement: TRadioGroup AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = edIncrement AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 0 Height = 51 Top = 97 Width = 304 Anchors = [akTop, akLeft, akRight] AutoFill = True AutoSize = True BorderSpacing.Top = 12 Caption = ' Day Increment Unit ' ChildSizing.LeftRightSpacing = 16 ChildSizing.TopBottomSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 4 ClientHeight = 31 ClientWidth = 300 Columns = 4 ItemIndex = 0 Items.Strings = ( 'Day' 'Week' 'Month' 'Year' ) TabOrder = 4 TabStop = True end end object ButtonPanel: TPanel Left = 0 Height = 33 Top = 156 Width = 320 Align = alBottom AutoSize = True BevelOuter = bvNone ClientHeight = 33 ClientWidth = 320 TabOrder = 1 object btnOk: TButton Left = 204 Height = 25 Top = 4 Width = 42 Align = alRight AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 4 BorderSpacing.Bottom = 4 Caption = 'OK' Default = True ModalResult = 1 OnClick = btnOkClick TabOrder = 0 end object btnCancel: TButton Left = 250 Height = 25 Top = 4 Width = 62 Align = alRight AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 8 BorderSpacing.Bottom = 4 Cancel = True Caption = 'Cancel' ModalResult = 2 OnClick = btnCancelClick TabOrder = 1 end end end