lazarus-ccr/components/gridprinter/examples/stringgrid_columns/unit1.lfm

object Form1: TForm1
  Left = 256
  Height = 324
  Top = 134
  Width = 470
  Caption = 'Form1'
  ClientHeight = 324
  ClientWidth = 470
  LCLVersion = '2.3.0.0'
  object StringGrid1: TStringGrid
    Left = 6
    Height = 250
    Top = 31
    Width = 426
    Align = alClient
    BorderSpacing.Around = 6
    ColCount = 4
    Columns = <    
      item
        Title.Caption = 'Col 1'
        Width = 120
      end    
      item
        Alignment = taRightJustify
        Title.Alignment = taRightJustify
        Title.Caption = 'Col 2'
        Width = 120
      end    
      item
        ButtonStyle = cbsCheckboxColumn
        Color = clActiveBorder
        Title.Alignment = taCenter
        Title.Caption = 'Col 3'
        Width = 100
      end>
    DefaultColWidth = 40
    DefaultRowHeight = 40
    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 = 470
    Align = alBottom
    AutoSize = True
    BevelOuter = bvNone
    ClientHeight = 37
    ClientWidth = 470
    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 Panel2: TPanel
    Left = 6
    Height = 19
    Top = 6
    Width = 458
    Align = alTop
    AutoSize = True
    BorderSpacing.Around = 6
    BevelOuter = bvNone
    ClientHeight = 19
    ClientWidth = 458
    TabOrder = 2
    object pnlCol1Alignment: TPanel
      AnchorSideLeft.Control = Panel2
      Left = 42
      Height = 19
      Top = 0
      Width = 87
      AutoSize = True
      BorderSpacing.Left = 42
      BevelOuter = bvNone
      ClientHeight = 19
      ClientWidth = 87
      TabOrder = 0
      object rbLeft1: TRadioButton
        Tag = 11
        AnchorSideLeft.Control = pnlCol1Alignment
        AnchorSideTop.Control = pnlCol1Alignment
        Left = 0
        Height = 19
        Top = 0
        Width = 24
        Caption = 'L'
        Checked = True
        OnChange = rbAlignmentChange
        TabOrder = 2
        TabStop = True
      end
      object rbCenter1: TRadioButton
        Tag = 13
        AnchorSideLeft.Control = rbLeft1
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol1Alignment
        Left = 30
        Height = 19
        Top = 0
        Width = 26
        BorderSpacing.Left = 6
        Caption = 'C'
        OnChange = rbAlignmentChange
        TabOrder = 0
      end
      object rbRight1: TRadioButton
        Tag = 12
        AnchorSideLeft.Control = rbCenter1
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol1Alignment
        Left = 62
        Height = 19
        Top = 0
        Width = 25
        BorderSpacing.Left = 6
        Caption = 'R'
        OnChange = rbAlignmentChange
        TabOrder = 1
      end
    end
    object pnlCol2Alignment: TPanel
      AnchorSideLeft.Control = Panel2
      Left = 162
      Height = 19
      Top = 0
      Width = 87
      AutoSize = True
      BorderSpacing.Left = 162
      BevelOuter = bvNone
      ClientHeight = 19
      ClientWidth = 87
      TabOrder = 1
      object rbLeft2: TRadioButton
        Tag = 21
        AnchorSideLeft.Control = pnlCol2Alignment
        AnchorSideTop.Control = pnlCol2Alignment
        Left = 0
        Height = 19
        Top = 0
        Width = 24
        Caption = 'L'
        OnChange = rbAlignmentChange
        TabOrder = 0
      end
      object rbCenter2: TRadioButton
        Tag = 23
        AnchorSideLeft.Control = rbLeft2
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol2Alignment
        Left = 30
        Height = 19
        Top = 0
        Width = 26
        BorderSpacing.Left = 6
        Caption = 'C'
        OnChange = rbAlignmentChange
        TabOrder = 1
      end
      object rbRight2: TRadioButton
        Tag = 22
        AnchorSideLeft.Control = rbCenter2
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol2Alignment
        Left = 62
        Height = 19
        Top = 0
        Width = 25
        BorderSpacing.Left = 6
        Caption = 'R'
        Checked = True
        OnChange = rbAlignmentChange
        TabOrder = 2
        TabStop = True
      end
    end
    object pnlCol3Alignment: TPanel
      AnchorSideLeft.Control = Panel2
      AnchorSideTop.Control = Panel2
      Left = 282
      Height = 19
      Top = 0
      Width = 87
      AutoSize = True
      BorderSpacing.Left = 282
      BevelOuter = bvNone
      ClientHeight = 19
      ClientWidth = 87
      TabOrder = 2
      object rbLeft3: TRadioButton
        Tag = 31
        AnchorSideLeft.Control = pnlCol3Alignment
        AnchorSideTop.Control = pnlCol3Alignment
        Left = 0
        Height = 19
        Top = 0
        Width = 24
        Caption = 'L'
        OnChange = rbAlignmentChange
        TabOrder = 0
      end
      object rbCenter3: TRadioButton
        Tag = 33
        AnchorSideLeft.Control = rbLeft3
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol3Alignment
        Left = 30
        Height = 19
        Top = 0
        Width = 26
        BorderSpacing.Left = 6
        Caption = 'C'
        Checked = True
        OnChange = rbAlignmentChange
        TabOrder = 1
        TabStop = True
      end
      object rbRight3: TRadioButton
        Tag = 32
        AnchorSideLeft.Control = rbCenter3
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = pnlCol3Alignment
        Left = 62
        Height = 19
        Top = 0
        Width = 25
        BorderSpacing.Left = 6
        Caption = 'R'
        OnChange = rbAlignmentChange
        TabOrder = 2
      end
    end
  end
  object Panel3: TPanel
    Left = 438
    Height = 256
    Top = 31
    Width = 26
    Align = alRight
    AutoSize = True
    BorderSpacing.Right = 6
    BevelOuter = bvNone
    ClientHeight = 256
    ClientWidth = 26
    TabOrder = 3
    object rbLayoutTop: TRadioButton
      Tag = 1
      AnchorSideLeft.Control = Panel3
      AnchorSideTop.Control = Panel3
      Left = 0
      Height = 19
      Top = 42
      Width = 24
      BorderSpacing.Top = 42
      Caption = 'T'
      OnChange = rbLayoutChange
      TabOrder = 0
    end
    object rbLayoutCenter: TRadioButton
      Tag = 2
      AnchorSideLeft.Control = Panel3
      AnchorSideTop.Control = rbLayoutTop
      AnchorSideTop.Side = asrBottom
      Left = 0
      Height = 19
      Top = 61
      Width = 26
      Caption = 'C'
      Checked = True
      OnChange = rbLayoutChange
      TabOrder = 2
      TabStop = True
    end
    object rbLayoutBottom: TRadioButton
      Tag = 3
      AnchorSideLeft.Control = Panel3
      AnchorSideTop.Control = rbLayoutCenter
      AnchorSideTop.Side = asrBottom
      Left = 0
      Height = 19
      Top = 80
      Width = 25
      Caption = 'B'
      OnChange = rbLayoutChange
      TabOrder = 1
    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