main.dfm

自定义的报表

      end
    end
    object tbNormalBar: TToolBar
      Left = 11
      Top = 28
      Width = 787
      Height = 22
      AutoSize = True
      Caption = '基本工具'
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      Images = ImageList1
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      object ToolButton4: TToolButton
        Left = 0
        Top = 0
        Caption = 'ToolButton4'
        ImageIndex = 10
        OnClick = btNewClick
      end
      object ToolButton3: TToolButton
        Left = 23
        Top = 0
        Caption = 'ToolButton3'
        ImageIndex = 9
        OnClick = btOpenClick
      end
      object ToolButton6: TToolButton
        Left = 46
        Top = 0
        Caption = 'ToolButton6'
        ImageIndex = 11
        OnClick = btSaveClick
      end
      object ToolButton9: TToolButton
        Left = 69
        Top = 0
        Width = 8
        Caption = 'ToolButton9'
        ImageIndex = 10
        Style = tbsSeparator
      end
      object ToolButton10: TToolButton
        Left = 77
        Top = 0
        Caption = 'ToolButton10'
        ImageIndex = 15
        OnClick = btTableSetupClick
      end
      object ToolButton11: TToolButton
        Left = 100
        Top = 0
        Caption = 'ToolButton11'
        ImageIndex = 14
        OnClick = btPrinterSetupClick
      end
      object ToolButton12: TToolButton
        Left = 123
        Top = 0
        Caption = 'ToolButton12'
        ImageIndex = 12
        OnClick = ToolButton24Click
      end
      object ToolButton17: TToolButton
        Left = 146
        Top = 0
        Caption = 'ToolButton17'
        ImageIndex = 13
      end
      object ToolButton18: TToolButton
        Left = 169
        Top = 0
        Width = 8
        Caption = 'ToolButton18'
        ImageIndex = 14
        Style = tbsSeparator
      end
      object cbZoom: TComboBox
        Left = 177
        Top = 1
        Width = 53
        Height = 20
        Style = csDropDownList
        ItemHeight = 12
        TabOrder = 2
        OnChange = cbZoomChange
        Items.Strings = (
          '200'
          '175'
          '150'
          '125'
          '100'
          '75'
          '50'
          '25')
      end
      object cbFont: TComboBox
        Left = 230
        Top = 1
        Width = 137
        Height = 20
        ItemHeight = 12
        TabOrder = 0
        Text = '宋体'
        OnChange = cbFontChange
      end
      object ToolButton7: TToolButton
        Left = 367
        Top = 0
        Width = 8
        Caption = 'ToolButton7'
        ImageIndex = 12
        Style = tbsSeparator
      end
      object cbFontSize: TComboBox
        Left = 375
        Top = 1
        Width = 48
        Height = 20
        ItemHeight = 12
        TabOrder = 1
        Text = '8'
        OnChange = cbFontChange
        Items.Strings = (
          '8'
          '9'
          '10'
          '12'
          '14'
          '16'
          '18'
          '20'
          '22'
          '24'
          '26'
          '28'
          '36'
          '48'
          '72')
      end
      object ToolButton5: TToolButton
        Left = 423
        Top = 0
        Width = 8
        Caption = 'ToolButton5'
        ImageIndex = 11
        Style = tbsSeparator
      end
      object btItalic: TToolButton
        Left = 431
        Top = 0
        Hint = '斜体字'
        Caption = 'btItalic'
        ImageIndex = 0
        Style = tbsCheck
        OnClick = cbFontChange
      end
      object btBold: TToolButton
        Left = 454
        Top = 0
        Hint = '粗体字'
        Caption = 'btBold'
        ImageIndex = 1
        Style = tbsCheck
        OnClick = cbFontChange
      end
      object btUnderline: TToolButton
        Left = 477
        Top = 0
        Hint = '下划线'
        Caption = 'btUnderline'
        ImageIndex = 2
        Style = tbsCheck
        OnClick = cbFontChange
      end
      object ToolButton42: TToolButton
        Left = 500
        Top = 0
        Width = 8
        Caption = 'ToolButton42'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object btLeft: TToolButton
        Left = 508
        Top = 0
        Hint = '左对齐'
        Caption = 'btLeft'
        Grouped = True
        ImageIndex = 5
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object btCenter: TToolButton
        Left = 531
        Top = 0
        Hint = '居中'
        Caption = 'btCenter'
        Grouped = True
        ImageIndex = 4
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object btRight: TToolButton
        Left = 554
        Top = 0
        Hint = '右对齐'
        Caption = 'btRight'
        Grouped = True
        ImageIndex = 3
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object ToolButton8: TToolButton
        Left = 577
        Top = 0
        Width = 8
        Caption = 'ToolButton8'
        ImageIndex = 12
        Style = tbsSeparator
      end
      object btTop: TToolButton
        Left = 585
        Top = 0
        Hint = '居上'
        Caption = 'btTop'
        Grouped = True
        ImageIndex = 7
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object btMedium: TToolButton
        Left = 608
        Top = 0
        Hint = '居中'
        Caption = 'btMedium'
        Grouped = True
        ImageIndex = 6
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object btBottom: TToolButton
        Left = 631
        Top = 0
        Hint = '居下'
        Caption = 'btBottom'
        Grouped = True
        ImageIndex = 8
        Style = tbsCheck
        OnClick = btLeftClick
      end
      object ToolButton2: TToolButton
        Left = 654
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 9
        Style = tbsSeparator
      end
    end
  end
  object BottomDock: TPanel
    Left = 0
    Top = 534
    Width = 800
    Height = 0
    Align = alBottom
    BevelOuter = bvNone
    DockSite = True
    TabOrder = 3
  end
  object CNReportRunTime1: TCNReportRunTime
    AutoGroup = False
    Left = 190
    Top = 128
  end
  object MainMenu1: TMainMenu
    AutoHotkeys = maManual