object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm Left = 552 Height = 369 Top = 253 Width = 582 Caption = 'Header/Footer' ClientHeight = 369 ClientWidth = 582 OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy LCLVersion = '2.3.0.0' object ButtonPanel1: TButtonPanel Left = 6 Height = 34 Top = 329 Width = 570 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True OKButton.OnClick = OKClick HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 0 ShowButtons = [pbOK, pbCancel] end object TabControl: TTabControl Left = 6 Height = 317 Top = 6 Width = 570 OnChange = TabControlChange OnChanging = TabControlChanging TabIndex = 0 Tabs.Strings = ( 'Header' 'Footer' ) Align = alClient BorderSpacing.Around = 6 TabOrder = 1 object edTextLeft: TEdit AnchorSideLeft.Control = cbShow AnchorSideTop.Control = cbShow AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Bevel1 Left = 10 Height = 23 Top = 58 Width = 176 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 8 Constraints.MinWidth = 125 TabOrder = 1 TextHint = 'Text in left-aligned section' end object edTextCenter: TEdit AnchorSideLeft.Control = Bevel1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edTextLeft AnchorSideRight.Control = Bevel2 Left = 194 Height = 23 Top = 58 Width = 185 Alignment = taCenter Anchors = [akTop, akLeft, akRight] Constraints.MinWidth = 125 TabOrder = 2 TextHint = 'Text in centered section' end object edTextRight: TEdit AnchorSideLeft.Control = Bevel2 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = edTextLeft AnchorSideRight.Control = TabControl AnchorSideRight.Side = asrBottom Left = 387 Height = 23 Top = 58 Width = 173 Alignment = taRightJustify Anchors = [akTop, akLeft, akRight] BorderSpacing.Right = 8 Constraints.MinWidth = 125 TabOrder = 3 TextHint = 'Text in right-aligned section' end object cbShow: TCheckBox AnchorSideLeft.Control = TabControl AnchorSideTop.Control = TabControl Left = 10 Height = 19 Top = 31 Width = 47 BorderSpacing.Left = 8 BorderSpacing.Top = 8 Caption = 'Show' TabOrder = 4 end object Bevel1: TBevel Left = 186 Height = 51 Top = 31 Width = 8 Anchors = [akTop] Shape = bsSpacer end object Bevel2: TBevel Left = 379 Height = 59 Top = 24 Width = 8 Anchors = [akTop] Shape = bsSpacer end object btnFont: TButton AnchorSideLeft.Control = cbShow AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbShow AnchorSideTop.Side = asrCenter Left = 89 Height = 25 Top = 28 Width = 75 BorderSpacing.Left = 32 Caption = 'Font...' OnClick = btnFontClick TabOrder = 5 end object Bevel3: TBevel AnchorSideLeft.Control = edTextLeft AnchorSideTop.Control = lblTextInfo AnchorSideTop.Side = asrBottom AnchorSideRight.Control = edTextRight AnchorSideRight.Side = asrBottom Left = 10 Height = 4 Top = 225 Width = 550 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 16 Shape = bsTopLine end object cbShowLine: TCheckBox AnchorSideLeft.Control = cbShow AnchorSideTop.Control = Bevel3 AnchorSideTop.Side = asrBottom Left = 10 Height = 19 Top = 241 Width = 115 BorderSpacing.Top = 12 Caption = 'Show dividing line' TabOrder = 6 end object lblLineWidth: TLabel AnchorSideLeft.Control = cbShowLine AnchorSideTop.Control = seLineWidth AnchorSideTop.Side = asrCenter Left = 10 Height = 15 Top = 272 Width = 88 Caption = 'Line width (mm)' end object seLineWidth: TFloatSpinEdit AnchorSideLeft.Control = lblLineWidth AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbShowLine AnchorSideTop.Side = asrBottom Left = 106 Height = 23 Top = 268 Width = 64 Alignment = taRightJustify BorderSpacing.Left = 8 BorderSpacing.Top = 8 BorderSpacing.Bottom = 8 DecimalPlaces = 1 Increment = 0.1 MaxValue = 3 MinValue = 0.1 TabOrder = 7 Value = 0.1 end object clbLineColor: TColorButton AnchorSideLeft.Control = seLineWidth AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = seLineWidth AnchorSideTop.Side = asrCenter AnchorSideBottom.Control = seLineWidth AnchorSideBottom.Side = asrBottom Left = 186 Height = 24 Top = 267 Width = 94 Anchors = [akTop, akLeft, akBottom] BorderSpacing.Left = 16 BorderWidth = 2 ButtonColorAutoSize = False ButtonColorSize = 16 ButtonColor = clBlack Caption = 'Line color' Margin = 4 end object lblTextInfo: TLabel AnchorSideLeft.Control = edTextLeft AnchorSideTop.Control = edTextLeft AnchorSideTop.Side = asrBottom Left = 10 Height = 120 Top = 89 Width = 278 BorderSpacing.Top = 8 Caption = 'Each section can contain the following parameters:'#13#10' $DATE - Current date'#13#10' $TIME - Current time'#13#10' $PAGE - Page number'#13#10' $PAGECOUNT - Number of pages'#13#10' $FULL_FILENAME - Full name of the printed file'#13#10' $FILENAME - Name of the printed file, without path'#13#10' $PATH - Path of the printed file' end end object FontDialog: TFontDialog MinFontSize = 0 MaxFontSize = 0 Left = 200 Top = 16 end end