You've already forked lazarus-ccr
223 lines
5.8 KiB
Plaintext
223 lines
5.8 KiB
Plaintext
![]() |
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 = 224
|
||
|
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 = 240
|
||
|
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 = 271
|
||
|
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 = 267
|
||
|
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
|
||
|
Left = 186
|
||
|
Height = 25
|
||
|
Top = 266
|
||
|
Width = 94
|
||
|
BorderSpacing.Left = 16
|
||
|
BorderSpacing.Bottom = 8
|
||
|
BorderWidth = 2
|
||
|
ButtonColorAutoSize = False
|
||
|
ButtonColorSize = 16
|
||
|
ButtonColor = clBlack
|
||
|
Caption = 'Line color'
|
||
|
Margin = 4
|
||
|
end
|
||
|
object lblTextInfo: TLabel
|
||
|
Left = 10
|
||
|
Height = 120
|
||
|
Top = 88
|
||
|
Width = 278
|
||
|
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
|