mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-09 04:13:04 +02:00
182 lines
4.2 KiB
Plaintext
182 lines
4.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 667
|
|
Height = 267
|
|
Top = 217
|
|
Width = 490
|
|
Caption = 'Export report demo'
|
|
ClientHeight = 267
|
|
ClientWidth = 490
|
|
Position = poScreenCenter
|
|
LCLVersion = '1.5'
|
|
object Button1: TButton
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = Button2
|
|
Left = 75
|
|
Height = 20
|
|
Top = 123
|
|
Width = 112
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Caption = 'Design report'
|
|
OnClick = Button1Click
|
|
TabOrder = 0
|
|
end
|
|
object Button2: TButton
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 193
|
|
Height = 20
|
|
Top = 123
|
|
Width = 104
|
|
AutoSize = True
|
|
Caption = 'Show report'
|
|
OnClick = Button2Click
|
|
TabOrder = 1
|
|
end
|
|
object Button9: TButton
|
|
AnchorSideLeft.Control = Button2
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 303
|
|
Height = 20
|
|
Top = 123
|
|
Width = 110
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Export report'
|
|
OnClick = Button9Click
|
|
TabOrder = 2
|
|
end
|
|
object Button3: TButton
|
|
Tag = 1
|
|
AnchorSideTop.Control = Button2
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Button2
|
|
Left = 75
|
|
Height = 20
|
|
Top = 149
|
|
Width = 112
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Right = 6
|
|
Caption = 'Design report'
|
|
OnClick = Button1Click
|
|
TabOrder = 3
|
|
end
|
|
object Button10: TButton
|
|
Tag = 1
|
|
AnchorSideLeft.Control = Button2
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Button2
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 303
|
|
Height = 20
|
|
Top = 149
|
|
Width = 110
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Export report'
|
|
OnClick = Button9Click
|
|
TabOrder = 4
|
|
end
|
|
object Button4: TButton
|
|
Tag = 1
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Button2
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 193
|
|
Height = 20
|
|
Top = 149
|
|
Width = 104
|
|
AutoSize = True
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Show report'
|
|
OnClick = Button2Click
|
|
TabOrder = 5
|
|
end
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideBottom.Control = Button1
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 16
|
|
Top = 127
|
|
Width = 54
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Demo 1:'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideBottom.Control = Button3
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 16
|
|
Top = 153
|
|
Width = 54
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Demo 2:'
|
|
ParentColor = False
|
|
end
|
|
object RadioGroup1: TRadioGroup
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Owner
|
|
Left = 178
|
|
Height = 76
|
|
Top = 0
|
|
Width = 134
|
|
AutoFill = True
|
|
AutoSize = True
|
|
Caption = 'File format'
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 1
|
|
ClientHeight = 54
|
|
ClientWidth = 126
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Export to ODS'
|
|
'Export to XLS'
|
|
'Export to XLSX'
|
|
)
|
|
TabOrder = 6
|
|
end
|
|
object frReport1: TfrReport
|
|
InitialZoom = pzDefault
|
|
Options = []
|
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
|
|
DataType = dtDataSet
|
|
left = 48
|
|
top = 24
|
|
end
|
|
object frDesigner1: TfrDesigner
|
|
left = 88
|
|
top = 24
|
|
end
|
|
object lrSpreadSheetExport1: TlrSpreadSheetExport
|
|
DataGrouping = ldgLikeReport
|
|
DataGroupingChunks = 50
|
|
OpenAfterExport = True
|
|
DeleteEmptyRow = False
|
|
MergeCell = True
|
|
ShowSetupForm = False
|
|
left = 232
|
|
top = 24
|
|
end
|
|
end
|