mc_fybzsd.~dfm

1、系统环境要求：所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库

object FYBZSD: TFYBZSD
  Left = 225
  Top = 80
  Hint = '费用标准设定'
  BorderStyle = bsToolWindow
  Caption = '费用标准设定：'
  ClientHeight = 198
  ClientWidth = 590
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  ShowHint = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 5
    Top = 4
    Width = 204
    Height = 133
    Caption = '费用类型：'
    Enabled = False
    TabOrder = 0
    object Label1: TLabel
      Left = 11
      Top = 22
      Width = 60
      Height = 12
      Caption = '费用类型：'
      FocusControl = DBEdit1
    end
    object Label2: TLabel
      Left = 11
      Top = 49
      Width = 36
      Height = 12
      Caption = '水费：'
      FocusControl = DBEdit2
    end
    object Label3: TLabel
      Left = 11
      Top = 77
      Width = 36
      Height = 12
      Caption = '电费：'
      FocusControl = DBEdit3
    end
    object Label4: TLabel
      Left = 11
      Top = 106
      Width = 48
      Height = 12
      Caption = '煤气费：'
      FocusControl = DBEdit4
    end
    object DBEdit1: TDBEdit
      Left = 71
      Top = 18
      Width = 124
      Height = 20
      DataField = '费用类型'
      DataSource = DataSource1
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 71
      Top = 45
      Width = 64
      Height = 20
      DataField = '水费'
      DataSource = DataSource1
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 71
      Top = 73
      Width = 64
      Height = 20
      DataField = '电费'
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 71
      Top = 102
      Width = 64
      Height = 20
      DataField = '煤气费'
      DataSource = DataSource1
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 215
    Top = 4
    Width = 371
    Height = 188
    Caption = '费用列表：'
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 8
      Top = 16
      Width = 354
      Height = 163
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
    end
  end
  object BitBtn1: TBitBtn
    Left = 5
    Top = 142
    Width = 100
    Height = 25
    Caption = '添加[&I]'
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      36020000424D3602000000000000360000002800000010000000100000000100
      10000000000000020000000000000000000000000000000000001F7C1F7C1F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FB356B556B556FF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FB556FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7F5330
      533851300000533053385130533853305338FF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7F0000C6300629FF7FFF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7F9744
      FF7F9744594CF37E8C5D84180A459744594CFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7F8E5D736E8E5DC4188420FF7FFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FB57E7176464D82184220FF7FFF7F1F7C1F7CFF7FFF7FFF7F
      C2098209C209C209FF7F2A7E444D464D82188420FF7F1F7C1F7CFF7FFF7FC009
      FF7FC209FF7FFF7F8209994C287E444D464D821844201F7C1F7CFF7FFF7FC209
      C209C209C209C209FF7FFF7FFF7F2A7E444D464D821884201F7CFF7FFF7FFF7F
      8211FF7F8211FF7FFF7F55385744FF7F287E444D464D82181F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F2A7E444D464D1F7CFF7FFF7FFF7F
      FF7FB556FF7F3546B556B556FF7FFF7FFF7FFF7F287E444D1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F2A7E1F7C1F7C1F7C1F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C}
  end
  object BitBtn2: TBitBtn
    Left = 108
    Top = 142
    Width = 100
    Height = 25
    Caption = '修改[&E]'
    TabOrder = 3
    OnClick = BitBtn2Click
    Glyph.Data = {
      36020000424D3602000000000000360000002800000010000000100000000100
      10000000000000020000000000000000000000000000000000001F7C1F7C1F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FB356B556B556FF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FB556FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7F5330
      533851300000533053385130533853305338FF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7F0000C6300629FF7FFF7FFF7FFF7FFF7FFF7F1F7C1F7CFF7FFF7F9744
      FF7F9744594CF37E8C5D84180A459744594CFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7F8E5D736E8E5DC4188420FF7FFF7FFF7F1F7C1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FB57E7176464D82184220FF7FFF7F1F7C1F7CFF7FFF7FFF7F
      C2098209C209C209FF7F2A7E444D464D82188420FF7F1F7C1F7CFF7FFF7FC009
      FF7FC209FF7FFF7F8209994C287E444D464D821844201F7C1F7CFF7FFF7FC209
      C209C209C209C209FF7FFF7FFF7F2A7E444D464D821884201F7CFF7FFF7FFF7F
      8211FF7F8211FF7FFF7F55385744FF7F287E444D464D82181F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F2A7E444D464D1F7CFF7FFF7FFF7F
      FF7FB556FF7F3546B556B556FF7FFF7FFF7FFF7F287E444D1F7CFF7FFF7FFF7F
      FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F2A7E1F7C1F7C1F7C1F7C
      1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C}
  end
  object BitBtn3: TBitBtn
    Left = 5
    Top = 170
    Width = 100
    Height = 25
    Caption = '删除[&D]'
    TabOrder = 4
    OnClick = BitBtn3Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn4: TBitBtn
    Left = 108
    Top = 170
    Width = 100
    Height = 25
    Caption = '退出[&Q]'
    TabOrder = 5
    OnClick = BitBtn4Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333FFFFF333333000033333388888833333333333F888888FFF333
      000033338811111188333333338833FFF388FF33000033381119999111833333
      38F338888F338FF30000339119933331111833338F388333383338F300003391
      13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
      33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
      33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
      000039183811193333918338F8F833F83333838F000039118111933339118338
      F3833F83333833830000339111193333391833338F33F8333FF838F300003391
      11833338111833338F338FFFF883F83300003339111888811183333338FF3888
      83FF83330000333399111111993333333388FFFFFF8833330000333333999999
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'WYGL'
    TableName = 'dbo.水电煤气费用标准'
    Left = 181
    Top = 100
    object Table1BDEDesigner: TStringField
      FieldName = '费用类型'
      Required = True
      FixedChar = True
    end
    object Table1BDEDesigner2: TFloatField
      FieldName = '水费'
      Required = True
    end
    object Table1BDEDesigner3: TFloatField
      FieldName = '电费'
      Required = True
    end
    object Table1BDEDesigner4: TFloatField
      FieldName = '煤气费'
      Required = True
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 149
    Top = 100
  end
end