uffjgtj.~dfm

行业应急系统 包括: 应急系统（待遇核发） 发放系统 开发环境:Delphi5 (sp1)+ Oracle 8.05 MultiExport是一个可以将数据按指定字段倒出

inherited frmFFJGTJ: TfrmFFJGTJ
  Left = 96
  Top = 155
  Caption = '发放机构统计表'
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlMain: TPanel
    object pnlTemp: TPanel
      Left = 0
      Top = 0
      Width = 536
      Height = 33
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 0
      object Label1: TLabel
        Left = 138
        Top = 10
        Width = 72
        Height = 12
        Caption = '选择发放机构'
      end
      object Label2: TLabel
        Left = 59
        Top = 10
        Width = 12
        Height = 12
        Caption = '年'
      end
      object Label3: TLabel
        Left = 118
        Top = 10
        Width = 12
        Height = 12
        Caption = '月'
      end
      object edtYear: TSpinEdit
        Left = 8
        Top = 6
        Width = 49
        Height = 21
        MaxValue = 2010
        MinValue = 2000
        TabOrder = 0
        Value = 2000
      end
      object edtMonth: TSpinEdit
        Left = 74
        Top = 6
        Width = 41
        Height = 21
        MaxValue = 12
        MinValue = 1
        TabOrder = 1
        Value = 1
      end
      object cmbInfo: TComboBox
        Left = 211
        Top = 6
        Width = 145
        Height = 20
        Style = csDropDownList
        ItemHeight = 12
        TabOrder = 2
        Items.Strings = (
          '工商银行'
          '农业银行'
          '中国银行'
          '建设银行'
          '邮政储蓄'
          '邮政汇款'
          '其他'
          '全部发放机构')
      end
      object Button1: TButton
        Left = 363
        Top = 7
        Width = 58
        Height = 19
        Caption = '统计'
        TabOrder = 3
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 422
        Top = 7
        Width = 58
        Height = 19
        Caption = '打印'
        TabOrder = 4
        OnClick = Button2Click
      end
      object Button3: TButton
        Left = 480
        Top = 7
        Width = 58
        Height = 19
        Caption = '导出'
        TabOrder = 5
        OnClick = Button3Click
      end
    end
    object grdInfo: TDBGridEh
      Left = 0
      Top = 33
      Width = 536
      Height = 315
      Align = alClient
      DataSource = souInfo
      Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = '宋体'
      FooterFont.Style = []
      FooterColor = clWindow
      TitleLines = 2
      UseMultiTitle = True
      AutoFitColWidths = True
      Flat = True
    end
  end
  object souInfo: TDataSource
    DataSet = qryInfo
    Left = 296
    Top = 40
  end
  object qryInfo: TQuery
    DatabaseName = 'MainDB'
    Left = 328
    Top = 40
  end
  object SaveDialog1: TSaveDialog
    Left = 408
    Top = 104
  end
  object KDatasetToText1: TKDatasetToText
    Dataset = qryInfo
    Delimiter = ','
    Left = 440
    Top = 104
  end
  object PrintDBGridEh1: TPrintDBGridEh
    DBGridEh = grdInfo
    Options = [pghFitGridToPageWidth, pghOptimalColWidths]
    Page.BottomMargin = 2
    Page.LeftMargin = 2
    Page.RightMargin = 2
    Page.TopMargin = 2
    PageFooter.Font.Charset = GB2312_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -15
    PageFooter.Font.Name = '宋体'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = GB2312_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -15
    PageHeader.Font.Name = '宋体'
    PageHeader.Font.Style = []
    PrintFontName = '宋体'
    Title.Strings = (
      '发放机构统计表')
    Units = MM
    Left = 376
    Top = 40
  end
end