⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mc_cnfcsh.~dfm

📁 1、系统环境要求:所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库
💻 ~DFM
字号:
object CNFCSH: TCNFCSH
  Left = 222
  Top = 75
  BorderStyle = bsToolWindow
  Caption = '采暖费初始化:'
  ClientHeight = 263
  ClientWidth = 231
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 6
    Top = 14
    Width = 60
    Height = 12
    Caption = '标准名称:'
    FocusControl = DBEdit1
  end
  object Label2: TLabel
    Left = 6
    Top = 40
    Width = 36
    Height = 12
    Caption = '金额:'
    FocusControl = DBEdit2
  end
  object DBEdit1: TDBEdit
    Left = 65
    Top = 10
    Width = 124
    Height = 20
    DataField = '标准名称'
    DataSource = DataSource1
    TabOrder = 0
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBEdit2: TDBEdit
    Left = 65
    Top = 36
    Width = 64
    Height = 20
    DataField = '金额'
    DataSource = DataSource1
    TabOrder = 1
    OnEnter = DBEdit1Enter
    OnExit = DBEdit1Exit
    OnKeyPress = DBEdit1KeyPress
  end
  object DBGrid1: TDBGrid
    Left = 4
    Top = 64
    Width = 221
    Height = 137
    DataSource = DataSource1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = '标准名称'
        Visible = True
      end
      item
        Expanded = False
        FieldName = '金额'
        Width = 55
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 3
    Top = 207
    Width = 113
    Height = 25
    Caption = '添加[&I]'
    TabOrder = 3
    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 = 120
    Top = 207
    Width = 105
    Height = 25
    Caption = '删除[&D]'
    TabOrder = 4
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 3
    Top = 236
    Width = 222
    Height = 25
    Caption = '初始化采暖费数据'
    TabOrder = 5
    OnClick = BitBtn3Click
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'WYGL'
    TableName = 'dbo.采暖费标准'
    Left = 176
    Top = 136
    object Table1BDEDesigner: TStringField
      FieldName = '标准名称'
      Required = True
      FixedChar = True
    end
    object Table1BDEDesigner2: TFloatField
      FieldName = '金额'
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 136
    Top = 136
  end
  object Query1: TQuery
    DatabaseName = 'WYGL'
    Left = 96
    Top = 176
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -