object Form1: TForm1 Left = 256 Height = 324 Top = 134 Width = 303 Caption = 'Form1' ClientHeight = 324 ClientWidth = 303 LCLVersion = '2.3.0.0' object StringGrid1: TStringGrid Left = 0 Height = 287 Top = 0 Width = 303 Align = alClient ColCount = 4 Columns = < item Title.Caption = 'Col 1' Width = 64 end item Alignment = taRightJustify Title.Alignment = taRightJustify Title.Caption = 'Col 2' Width = 64 end item ButtonStyle = cbsCheckboxColumn Color = clActiveBorder Title.Alignment = taCenter Title.Caption = 'Col 3' Width = 64 end> Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goSmoothScroll, goFixedRowNumbering] TabOrder = 0 Cells = ( 11 1 1 'abc' 1 2 'def' 1 3 'ghi' 1 4 'jkl' 2 1 'test 1' 2 2 'test 2' 2 3 'test 3' 2 4 'test 5' 3 1 '1' 3 2 '0' 3 4 '1' ) end object Panel1: TPanel Left = 0 Height = 37 Top = 287 Width = 303 Align = alBottom AutoSize = True BevelOuter = bvNone ClientHeight = 37 ClientWidth = 303 TabOrder = 1 object Button1: TButton AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Panel1 Left = 6 Height = 25 Top = 6 Width = 75 BorderSpacing.Around = 6 Caption = 'Preview...' OnClick = Button1Click TabOrder = 0 end end object GridPrinter1: TGridPrinter Grid = StringGrid1 Footer.Font.Height = -11 Footer.FontSize = 8 Header.Font.Height = -11 Header.FontSize = 8 ShowPrintDialog = gpdPrintDialog Left = 63 Top = 143 end object GridPrintPreviewDialog1: TGridPrintPreviewDialog FormParams.PixelsPerInch = 96 GridPrinter = GridPrinter1 Left = 192 Top = 143 end end