u_tj.dfm

c/s系统。 delphi 6+access 运行前先配置数据环境：把db文件夹复制到c：下 要编译请安装第三方控件fastreport2.47 这是我的小小的毕业设计

        Top = 72
        Width = 24
        Height = 16
        Caption = #32467#26463
      end
      object MaskEdit1: TMaskEdit
        Left = 80
        Top = 24
        Width = 80
        Height = 24
        EditMask = '!0000/00/00;1;_'
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        MaxLength = 10
        TabOrder = 0
        Text = '0000-00-00'
      end
      object MaskEdit2: TMaskEdit
        Left = 80
        Top = 72
        Width = 80
        Height = 24
        EditMask = '!0000/00/00;1;_'
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        MaxLength = 10
        TabOrder = 1
        Text = '0000-00-00'
      end
    end
    object GroupBox3: TGroupBox
      Left = 424
      Top = 24
      Width = 225
      Height = 105
      Caption = #32479#35745#23545#35937
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object CheckBox1: TCheckBox
        Left = 16
        Top = 32
        Width = 97
        Height = 17
        Caption = #36710#36742#21495#30721
        TabOrder = 0
        OnClick = CheckBox1Click
      end
      object CheckBox2: TCheckBox
        Left = 16
        Top = 72
        Width = 97
        Height = 17
        Caption = #32500#20462#21592
        TabOrder = 1
        OnClick = CheckBox2Click
      end
      object Edit1: TEdit
        Left = 112
        Top = 32
        Width = 105
        Height = 21
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 2
      end
      object Edit2: TEdit
        Left = 112
        Top = 72
        Width = 105
        Height = 21
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ParentFont = False
        TabOrder = 3
      end
    end
    object GroupBox4: TGroupBox
      Left = 256
      Top = 24
      Width = 161
      Height = 105
      Caption = #32479#35745#20869#23481
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object RadioButton1: TRadioButton
        Left = 56
        Top = 24
        Width = 81
        Height = 25
        Caption = #32500#20462#26102#38388
        TabOrder = 0
        OnClick = RadioButton1Click
      end
      object RadioButton2: TRadioButton
        Left = 56
        Top = 72
        Width = 97
        Height = 17
        Caption = #20462#29702#24773#20917
        TabOrder = 1
        OnClick = RadioButton2Click
      end
    end
    object Button1: TButton
      Left = 224
      Top = 152
      Width = 75
      Height = 25
      Caption = #32479#35745
      TabOrder = 3
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 456
      Top = 152
      Width = 75
      Height = 25
      Caption = #25171#21360
      Enabled = False
      TabOrder = 4
      OnClick = Button2Click
    end
  end
  object Query1: TQuery
    DatabaseName = 'tjdb'
    Left = 656
    Top = 216
  end
  object Query2: TQuery
    DatabaseName = 'tjdb'
    SQL.Strings = (
      ''
      ''
      ' '
      ''
      '  ')
    Left = 656
    Top = 256
  end
  object Query3: TQuery
    DatabaseName = 'tjdb'
    Left = 656
    Top = 144
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 656
    Top = 176
  end
  object DataSource2: TDataSource
    DataSet = Query3
    Left = 656
    Top = 96
  end
  object Query4: TQuery
    DatabaseName = 'tjdb'
    Left = 656
    Top = 296
  end
  object Database1: TDatabase
    AliasName = 'cs'
    DatabaseName = 'tjdb'
    LoginPrompt = False
    SessionName = 'Default'
    Left = 656
    Top = 48
  end
  object frPrintTable1: TfrPrintTable
    DataSet = Query1
    PageSize = 9
    PageWidth = 0
    PageHeight = 0
    PageMargins.Left = 0
    PageMargins.Top = 0
    PageMargins.Right = 0
    PageMargins.Bottom = 0
    Title.Font.Charset = ANSI_CHARSET
    Title.Font.Color = clWindowText
    Title.Font.Height = -20
    Title.Font.Name = #23435#20307
    Title.Font.Style = [fsBold]
    Title.Color = clWhite
    Title.Frame = []
    Title.FrameWidth = 1
    Title.Text = #20462#29702#24773#20917#32479#35745#34920
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -13
    PageHeader.Font.Name = 'Arial'
    PageHeader.Font.Style = []
    PageHeader.Color = clWhite
    PageHeader.Frame = []
    PageHeader.FrameWidth = 1
    PageHeader.Align = taLeftJustify
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -13
    PageFooter.Font.Name = 'Arial'
    PageFooter.Font.Style = []
    PageFooter.Color = clWhite
    PageFooter.Frame = []
    PageFooter.FrameWidth = 1
    Header.Font.Charset = DEFAULT_CHARSET
    Header.Font.Color = clWhite
    Header.Font.Height = -13
    Header.Font.Name = 'Arial'
    Header.Font.Style = [fsBold]
    Header.Color = clNavy
    Header.Frame = [frLeft, frTop, frRight, frBottom]
    Header.FrameWidth = 1
    Footer.Font.Charset = DEFAULT_CHARSET
    Footer.Font.Color = clWindowText
    Footer.Font.Height = -13
    Footer.Font.Name = 'Arial'
    Footer.Font.Style = [fsItalic]
    Footer.Color = clSilver
    Footer.Frame = [frLeft, frTop, frRight, frBottom]
    Footer.FrameWidth = 1
    Summary.Font.Charset = DEFAULT_CHARSET
    Summary.Font.Color = clWindowText
    Summary.Font.Height = -16
    Summary.Font.Name = 'Arial'
    Summary.Font.Style = [fsItalic]
    Summary.Color = clWhite
    Summary.Frame = []
    Summary.FrameWidth = 1
    Body.Font.Charset = GB2312_CHARSET
    Body.Font.Color = clWindowText
    Body.Font.Height = -13
    Body.Font.Name = 'Arial'
    Body.Font.Style = []
    Body.Color = clWhite
    Body.Frame = [frLeft, frTop, frRight, frBottom]
    Body.FrameWidth = 2
    PrintOptions = [frpoHeader, frpoHeaderOnEveryPage]
    Left = 656
    Top = 336
  end
end