Files
lazarus-ccr/components/gridprinter/examples/stringgrid_formatted/main.lfm

77 lines
1.8 KiB
Plaintext
Raw Normal View History

object MainForm: TMainForm
Left = 356
Height = 441
Top = 194
Width = 779
Caption = 'MainForm'
ClientHeight = 441
ClientWidth = 779
OnCreate = FormCreate
LCLVersion = '2.3.0.0'
object ButtonPanel: TPanel
Left = 0
Height = 37
Top = 404
Width = 779
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 37
ClientWidth = 779
TabOrder = 0
object btnPrint: TButton
AnchorSideLeft.Control = ButtonPanel
AnchorSideTop.Control = ButtonPanel
Left = 6
Height = 25
Top = 6
Width = 60
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Print...'
OnClick = btnPrintClick
TabOrder = 0
end
object btnPreview: TButton
AnchorSideLeft.Control = btnPrint
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ButtonPanel
Left = 78
Height = 25
Top = 6
Width = 76
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Around = 6
Caption = 'Preview...'
OnClick = btnPreviewClick
TabOrder = 1
end
end
object StringGrid1: TStringGrid
Left = 6
Height = 398
Top = 6
Width = 767
Align = alClient
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goRowSizing, goColSizing, goThumbTracking, goSmoothScroll]
TabOrder = 1
end
object GridPrinter1: TGridPrinter
Grid = StringGrid1
Footer.Font.Height = -11
Header.Font.Height = -11
ShowPrintDialog = gpdPrintDialog
Left = 218
Top = 147
end
object GridPrintPreviewDialog1: TGridPrintPreviewDialog
GridPrinter = GridPrinter1
Left = 400
Top = 147
end
end