object CBDemo02: TCBDemo02
  Left = 346
  Top = 160
  Width = 614
  Height = 480
  Caption = 'CBDemo02'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 120
  Position = poScreenCenter
  TextHeight = 16
  object CB_SortGrid1: TCB_SortGrid
    Left = 24
    Top = 128
    Width = 561
    Height = 289
    Cursor = 1
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    About = 'Version 5.32'
    AboutRegistered = 'TOM SNIDER'
    DisplayDBMemo = True
    DisplayDBImage = True
    AllowSort = True
    AutoAlign = False
    DefaultRowHeight = 243
  end
  object Memo1: TMemo
    Left = 24
    Top = 8
    Width = 561
    Height = 113
    Lines.Strings = (
      'This demo displays some of the TCB_SortGrid capabilities e.g.'
      ' (1) Click on the header to sort the grid'
      ' (2) Display of Images and Memos'
      ''
      
        'It also displays the print capabilities of Reportit by printing ' +
        'this complete grid'
      'with a single line of code.')
    TabOrder = 1
  end
  object Preview: TButton
    Left = 208
    Top = 424
    Width = 75
    Height = 25
    Caption = '&Preview'
    TabOrder = 2
    OnClick = PreviewClick
  end
  object Exit: TButton
    Left = 328
    Top = 424
    Width = 75
    Height = 25
    Caption = '&Exit'
    TabOrder = 3
    OnClick = ExitClick
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 8
    Top = 8
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'DBDEMOS'
    SQL.Strings = (
      'select * from biolife')
    Left = 40
    Top = 8
    object Query1Common_Name: TStringField
      DisplayWidth = 16
      FieldName = 'Common_Name'
      Size = 30
    end
    object Query1Category: TStringField
      DisplayWidth = 13
      FieldName = 'Category'
      Size = 15
    end
    object Query1Lengthcm: TFloatField
      DisplayWidth = 13
      FieldName = 'Length (cm)'
    end
    object Query1Notes: TMemoField
      DisplayWidth = 32
      FieldName = 'Notes'
      Size = 50
    end
    object Query1Graphic: TGraphicField
      DisplayWidth = 45
      FieldName = 'Graphic'
    end
  end
  object PrintGridReport1: TPrintGridReport
    About = 'Version 5.32'
    AboutRegistered = 'TOM SNIDER'
    ViewButtonVisible = False
    Copies = 1
    OutputTo = poViewer
    Orientation = Default
    ViewBkColor = 11234567
    Units = poInches
    ViewHeading = 'Reportit Viewer'
    FooterFont.Color = clWindowText
    FooterFont.Height = 12
    FooterFont.Name = 'Arial'
    FooterFont.Style = []
    HeaderFont.Color = clWindowText
    HeaderFont.Height = 16
    HeaderFont.Name = 'Arial'
    HeaderFont.Style = []
    ViewerOptions = []
    SubTotalString = '** SubTotal of @RecCount Records **'
    TotalString = '*** Total of @RecCount Records ***'
    ZoomPercentage = 100.000000000000000000
    HeaderTop = 0.500000000000000000
    HeaderStringCenter = 'Page Header'
    HeaderEnabled = True
    HeaderOutlined = True
    HeaderFilled = False
    FooterTop = 7.670000000000000000
    FooterString = 'Page Footer'
    FooterEnabled = True
    FooterOutlined = True
    FooterFilled = True
    FooterStringLeft = 'Printed on @Date at @Time'
    FooterStringRight = 'Page @Page'
    DisableControls = True
    BorderLeft = 0.250000000000000000
    BorderRight = 0.250000000000000000
    GridHeadingRow = 1.500000000000000000
    GridHeadingCol = 0.250000000000000000
    GridHeadingEnabled = True
    GridHeadingOutlined = True
    GridHeadingFilled = False
    GridLines = True
    LineSpacing = 1.500000000000000000
    Grid = CB_SortGrid1
    GridMinWidth = False
    GridCentered = True
    GridPrintTotal = True
    PrintSubTotals = False
    FrameStyleLeft = frSingleThin
    FrameStyleTop = frSingleThin
    FrameStyleRight = frSingleThin
    FrameStyleBottom = frSingleThin
    ReportStyle = rsOwn
    Left = 88
    Top = 400
  end
end