2020-09-19 14:33:02 +00:00
|
|
|
object ReportFrame: TReportFrame
|
|
|
|
Left = 0
|
|
|
|
Height = 240
|
|
|
|
Top = 0
|
|
|
|
Width = 310
|
|
|
|
ClientHeight = 240
|
|
|
|
ClientWidth = 310
|
|
|
|
TabOrder = 0
|
|
|
|
DesignLeft = 998
|
|
|
|
DesignTop = 330
|
|
|
|
object ReportToolBar: TToolBar
|
|
|
|
Left = 0
|
|
|
|
Height = 24
|
|
|
|
Top = 0
|
|
|
|
Width = 306
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Right = 4
|
|
|
|
BorderSpacing.Bottom = 6
|
|
|
|
ButtonHeight = 22
|
|
|
|
ButtonWidth = 25
|
|
|
|
Caption = 'ReportToolBar'
|
|
|
|
EdgeBorders = [ebBottom]
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
TabOrder = 0
|
|
|
|
Transparent = True
|
|
|
|
object tbSaveReport: TToolButton
|
|
|
|
Left = 1
|
|
|
|
Hint = 'Save report to file'
|
|
|
|
Top = 0
|
|
|
|
Caption = 'Save'
|
|
|
|
ImageIndex = 4
|
|
|
|
OnClick = tbSaveReportClick
|
|
|
|
end
|
|
|
|
object tbPrintReport: TToolButton
|
|
|
|
Left = 26
|
|
|
|
Hint = 'Print report'
|
|
|
|
Top = 0
|
|
|
|
Caption = 'Print'
|
|
|
|
ImageIndex = 5
|
|
|
|
OnClick = tbPrintReportClick
|
|
|
|
end
|
|
|
|
object tbCopyReport: TToolButton
|
|
|
|
Left = 51
|
|
|
|
Hint = 'Copy report to clipboard'
|
|
|
|
Top = 0
|
|
|
|
Caption = 'Copy'
|
|
|
|
ImageIndex = 7
|
|
|
|
OnClick = tbCopyReportClick
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object ReportPanel: TPanel
|
2020-09-21 21:39:40 +00:00
|
|
|
Left = 4
|
|
|
|
Height = 206
|
2020-09-19 14:33:02 +00:00
|
|
|
Top = 30
|
2020-09-21 21:39:40 +00:00
|
|
|
Width = 302
|
2020-09-19 14:33:02 +00:00
|
|
|
Align = alClient
|
2020-09-21 21:39:40 +00:00
|
|
|
BorderSpacing.Around = 4
|
2020-09-19 14:33:02 +00:00
|
|
|
BevelOuter = bvNone
|
|
|
|
BorderStyle = bsSingle
|
2020-09-21 21:39:40 +00:00
|
|
|
ClientHeight = 202
|
|
|
|
ClientWidth = 298
|
|
|
|
Color = clWhite
|
|
|
|
ParentColor = False
|
2020-09-19 14:33:02 +00:00
|
|
|
TabOrder = 1
|
|
|
|
object ReportMemo: TMemo
|
|
|
|
Left = 4
|
2020-09-21 21:39:40 +00:00
|
|
|
Height = 194
|
2020-09-19 14:33:02 +00:00
|
|
|
Top = 4
|
2020-09-21 21:39:40 +00:00
|
|
|
Width = 294
|
2020-09-19 14:33:02 +00:00
|
|
|
Align = alClient
|
2020-09-21 21:39:40 +00:00
|
|
|
BorderSpacing.Left = 4
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
BorderSpacing.Bottom = 4
|
2020-09-19 14:33:02 +00:00
|
|
|
BorderStyle = bsNone
|
2020-09-21 21:39:40 +00:00
|
|
|
Color = clWhite
|
2020-09-19 14:33:02 +00:00
|
|
|
Font.Height = -11
|
|
|
|
Font.Name = 'Courier New'
|
|
|
|
ParentFont = False
|
|
|
|
ScrollBars = ssAutoBoth
|
|
|
|
TabOrder = 0
|
2020-10-11 11:47:22 +00:00
|
|
|
WordWrap = False
|
2020-09-19 14:33:02 +00:00
|
|
|
end
|
|
|
|
end
|
|
|
|
object SaveDialog: TSaveDialog
|
|
|
|
Left = 48
|
|
|
|
Top = 56
|
|
|
|
end
|
|
|
|
object PrintDialog: TPrintDialog
|
|
|
|
Left = 48
|
|
|
|
Top = 114
|
|
|
|
end
|
|
|
|
end
|