object MainForm: TMainForm Left = 361 Height = 546 Top = 215 Width = 1310 AutoSize = True Caption = 'JvYearGrid Demo' ClientHeight = 546 ClientWidth = 1310 OnActivate = FormActivate OnCreate = FormCreate LCLVersion = '2.1.0.0' object JvYearGrid1: TJvYearGrid AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner Left = 8 Height = 248 Top = 8 Width = 882 HTMLBorder = False HTMLFontName = 'Arial' BorderColor = clCream Year = 2018 AutoSizeOptions = [aoGrid, aoFirstColumn, aoFirstRow, aoColumns, aoRows] FirstColWidth = 67 FirstRowHeight = 19 CellMargins.Left = 2 CellMargins.Top = 2 CellMargins.Right = 2 CellMargins.Bottom = 2 DayFormat = dfShort WeekendDays = [wdSaturday, wdSunday] MonthNamesAlignment = taCenter DayNamesAlignment = taCenter DaysAlignment = taCenter DefaultColWidth = 19 BorderSpacing.Around = 8 ScrollBars = ssNone TitleStyle = tsStandard ColWidths = ( 67 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 22 ) RowHeights = ( 19 19 19 19 19 19 19 19 19 19 19 19 19 ) end object Panel1: TPanel AnchorSideLeft.Control = Owner AnchorSideTop.Control = JvYearGrid1 AnchorSideTop.Side = asrBottom Left = 0 Height = 89 Top = 264 Width = 905 AutoSize = True BorderSpacing.Bottom = 16 BevelOuter = bvNone ClientHeight = 89 ClientWidth = 905 ParentFont = False TabOrder = 1 object edLeftMargin: TSpinEdit AnchorSideTop.Control = edTopMargin AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Label4 AnchorSideRight.Side = asrBottom Left = 24 Height = 23 Top = 27 Width = 50 Anchors = [akTop, akRight] BorderSpacing.Left = 16 BorderSpacing.Top = 4 ParentFont = False TabOrder = 0 end object edRightMargin: TSpinEdit AnchorSideLeft.Control = edTopMargin AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edLeftMargin Left = 136 Height = 23 Top = 27 Width = 50 BorderSpacing.Left = 4 ParentFont = False TabOrder = 1 end object edTopMargin: TSpinEdit AnchorSideLeft.Control = edLeftMargin AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Panel1 Left = 82 Height = 23 Top = 0 Width = 50 BorderSpacing.Left = 8 ParentFont = False TabOrder = 2 end object edBottomMargin: TSpinEdit AnchorSideLeft.Control = edTopMargin AnchorSideTop.Control = edLeftMargin AnchorSideTop.Side = asrBottom Left = 82 Height = 23 Top = 54 Width = 50 BorderSpacing.Top = 4 ParentFont = False TabOrder = 3 end object cmbDayNamesAlignment: TComboBox AnchorSideLeft.Control = Label1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edTopMargin Left = 398 Height = 23 Top = 0 Width = 100 BorderSpacing.Left = 8 ItemHeight = 15 Items.Strings = ( 'taLeftJustify' 'taRightJustify' 'taCenter' ) OnChange = cmbDayNamesAlignmentChange ParentFont = False Style = csDropDownList TabOrder = 4 end object Label1: TLabel AnchorSideTop.Control = cmbDayNamesAlignment AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Label2 AnchorSideRight.Side = asrBottom Left = 234 Height = 15 Top = 4 Width = 156 Anchors = [akTop, akRight] Caption = 'Day names alignment/format' ParentColor = False ParentFont = False end object Label2: TLabel AnchorSideLeft.Control = edRightMargin AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cmbMonthNamesAlignment AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Label1 AnchorSideRight.Side = asrBottom Left = 218 Height = 15 Top = 31 Width = 172 BorderSpacing.Left = 32 Caption = 'Month names alignment/format' ParentColor = False ParentFont = False end object cmbMonthNamesAlignment: TComboBox AnchorSideLeft.Control = cmbDayNamesAlignment AnchorSideTop.Control = cmbDayNamesAlignment AnchorSideTop.Side = asrBottom AnchorSideRight.Control = cmbDayNamesAlignment AnchorSideRight.Side = asrBottom Left = 398 Height = 23 Top = 27 Width = 100 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 4 ItemHeight = 15 Items.Strings = ( 'taLeftJustify' 'taRightJustify' 'taCenter' ) OnChange = cmbMonthNamesAlignmentChange ParentFont = False Style = csDropDownList TabOrder = 5 end object Label3: TLabel AnchorSideTop.Control = cmbDaysAlignment AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Label1 AnchorSideRight.Side = asrBottom Left = 308 Height = 15 Top = 58 Width = 82 Anchors = [akTop, akRight] Caption = 'Days alignment' ParentColor = False ParentFont = False end object cmbDaysAlignment: TComboBox AnchorSideLeft.Control = cmbDayNamesAlignment AnchorSideTop.Control = cmbMonthNamesAlignment AnchorSideTop.Side = asrBottom AnchorSideRight.Control = cmbDayNamesAlignment AnchorSideRight.Side = asrBottom Left = 398 Height = 23 Top = 54 Width = 100 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 4 ItemHeight = 15 Items.Strings = ( 'taLeftJustify' 'taRightJustify' 'taCenter' ) OnChange = cmbDaysAlignmentChange ParentFont = False Style = csDropDownList TabOrder = 6 end object cmbFlat: TCheckBox AnchorSideLeft.Control = cmbMonthFormat AnchorSideTop.Control = cmbDaysAlignment AnchorSideTop.Side = asrCenter Left = 506 Height = 19 Top = 56 Width = 39 BorderSpacing.Right = 16 Caption = 'Flat' OnChange = cmbFlatChange ParentFont = False TabOrder = 7 end object cmbDayFormat: TComboBox AnchorSideLeft.Control = cmbDayNamesAlignment AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cmbDayNamesAlignment Left = 506 Height = 23 Top = 0 Width = 100 BorderSpacing.Left = 8 ItemHeight = 15 Items.Strings = ( 'dfInitial' 'dfShort' 'dfLong' ) OnChange = cmbDayFormatChange ParentFont = False Style = csDropDownList TabOrder = 8 end object cmbMonthFormat: TComboBox AnchorSideLeft.Control = cmbDayNamesAlignment AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cmbMonthNamesAlignment Left = 506 Height = 23 Top = 27 Width = 100 BorderSpacing.Left = 8 ItemHeight = 15 Items.Strings = ( 'mfShort' 'mfLong' ) OnChange = cmbMonthFormatChange ParentFont = False Style = csDropDownList TabOrder = 9 end object udYear: TUpDown AnchorSideLeft.Control = lblYear AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cmbDayFormat AnchorSideBottom.Control = cmbDayFormat AnchorSideBottom.Side = asrBottom Left = 657 Height = 23 Top = 0 Width = 57 Anchors = [akTop, akLeft, akBottom] BorderSpacing.Left = 3 Max = 3000 Min = 0 OnClick = udYearClick Orientation = udHorizontal Position = 0 TabOrder = 10 end object lblYear: TLabel AnchorSideLeft.Control = cmbDayFormat AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cmbDayFormat AnchorSideTop.Side = asrCenter Left = 632 Height = 15 Top = 4 Width = 22 BorderSpacing.Left = 26 Caption = 'Year' ParentColor = False ParentFont = False end object Label4: TLabel AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = edTopMargin AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 66 BorderSpacing.Left = 8 Caption = 'Cell margins' ParentColor = False end object btnFont: TButton AnchorSideLeft.Control = lblYear AnchorSideTop.Control = cmbDaysAlignment AnchorSideTop.Side = asrCenter AnchorSideRight.Control = udYear AnchorSideRight.Side = asrBottom Left = 632 Height = 25 Top = 53 Width = 82 Anchors = [akTop, akLeft, akRight] AutoSize = True Caption = 'Font...' OnClick = btnFontClick TabOrder = 11 end object rgAutoSize: TCheckGroup AnchorSideLeft.Control = udYear AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edTopMargin Left = 730 Height = 89 Top = 0 Width = 167 AutoFill = True AutoSize = True BorderSpacing.Left = 16 BorderSpacing.Right = 8 Caption = 'Auto size' ChildSizing.LeftRightSpacing = 6 ChildSizing.TopBottomSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 2 ClientHeight = 69 ClientWidth = 163 Columns = 2 Items.Strings = ( 'Grid' 'First column' 'First row' 'Columns' 'Rows' ) OnItemClick = rgAutoSizeItemClick TabOrder = 12 Data = { 050000000202020202 } end object cmbAutoSize: TCheckBox AnchorSideTop.Control = rgAutoSize AnchorSideRight.Control = rgAutoSize AnchorSideRight.Side = asrBottom Left = 877 Height = 19 Top = 0 Width = 20 Anchors = [akTop, akRight] Checked = True OnChange = cmbAutoSizeChange State = cbChecked TabOrder = 13 end end object FontDialog1: TFontDialog MinFontSize = 0 MaxFontSize = 0 left = 568 top = 320 end end