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

📄 mc_sfdtx.dfm

📁 1、系统环境要求:所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库
💻 DFM
📖 第 1 页 / 共 3 页
字号:
        Top = 270
        Width = 62
        Height = 20
        BorderStyle = bsNone
        Color = clSilver
        DataField = '剩余金额'
        DataSource = DataSource4
        Enabled = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 3
      end
      object DBEdit4: TDBEdit
        Left = 92
        Top = 77
        Width = 62
        Height = 20
        DataField = '收费金额'
        DataSource = DataSource4
        TabOrder = 4
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DateTimePicker1: TDateTimePicker
        Left = 182
        Top = 102
        Width = 20
        Height = 20
        CalAlignment = dtaLeft
        Date = 37186
        Time = 37186
        DateFormat = dfLong
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 5
        OnCloseUp = DateTimePicker1CloseUp
      end
      object DateTimePicker2: TDateTimePicker
        Left = 182
        Top = 126
        Width = 20
        Height = 20
        CalAlignment = dtaLeft
        Date = 37186
        Time = 37186
        DateFormat = dfLong
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 6
        OnCloseUp = DateTimePicker2CloseUp
      end
      object DBEdit1: TDBEdit
        Left = 92
        Top = 102
        Width = 89
        Height = 20
        DataField = '计费起始日期'
        DataSource = DataSource4
        MaxLength = 10
        TabOrder = 7
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit2: TDBEdit
        Left = 92
        Top = 126
        Width = 89
        Height = 20
        DataField = '计费终止日期'
        DataSource = DataSource4
        MaxLength = 10
        TabOrder = 8
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit16: TDBEdit
        Left = 92
        Top = 176
        Width = 62
        Height = 20
        DataField = '上月读数'
        DataSource = DataSource4
        TabOrder = 9
      end
    end
    object TabSheet2: TTabSheet
      Caption = '电表'
      ImageIndex = 1
      object Label13: TLabel
        Left = 7
        Top = 10
        Width = 60
        Height = 12
        Caption = '电表编号:'
      end
      object Label14: TLabel
        Left = 7
        Top = 34
        Width = 60
        Height = 12
        Caption = '户主姓名:'
      end
      object Label15: TLabel
        Left = 7
        Top = 58
        Width = 60
        Height = 12
        Caption = '收费标准:'
      end
      object Label16: TLabel
        Left = 7
        Top = 81
        Width = 60
        Height = 12
        Caption = '收费金额:'
        FocusControl = DBEdit8
      end
      object Label17: TLabel
        Left = 7
        Top = 106
        Width = 84
        Height = 12
        Caption = '计费起始日期:'
      end
      object Label18: TLabel
        Left = 7
        Top = 130
        Width = 84
        Height = 12
        Caption = '计费终止日期:'
      end
      object Label19: TLabel
        Left = 7
        Top = 154
        Width = 60
        Height = 12
        Caption = '本月读数:'
        FocusControl = DBEdit14
      end
      object Label20: TLabel
        Left = 7
        Top = 178
        Width = 60
        Height = 12
        Caption = '上月读数:'
      end
      object Label21: TLabel
        Left = 7
        Top = 202
        Width = 48
        Height = 12
        Caption = '使用数:'
      end
      object Label22: TLabel
        Left = 7
        Top = 226
        Width = 60
        Height = 12
        Caption = '应收金额:'
        FocusControl = DBEdit17
      end
      object Label23: TLabel
        Left = 7
        Top = 250
        Width = 60
        Height = 12
        Caption = '实收金额:'
        FocusControl = DBEdit18
      end
      object Label24: TLabel
        Left = 7
        Top = 274
        Width = 60
        Height = 12
        Caption = '剩余金额:'
        FocusControl = DBEdit19
      end
      object DBText6: TDBText
        Left = 93
        Top = 8
        Width = 65
        Height = 17
        DataField = '电表编号'
        DataSource = DataSource5
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBText7: TDBText
        Left = 93
        Top = 32
        Width = 65
        Height = 17
        DataField = '户主姓名'
        DataSource = DataSource5
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBText8: TDBText
        Left = 93
        Top = 56
        Width = 65
        Height = 17
        DataField = '收费标准'
        DataSource = DataSource5
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBText10: TDBText
        Left = 93
        Top = 200
        Width = 65
        Height = 17
        DataField = '使用数'
        DataSource = DataSource5
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBEdit8: TDBEdit
        Left = 93
        Top = 77
        Width = 64
        Height = 20
        DataField = '收费金额'
        DataSource = DataSource5
        TabOrder = 0
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit14: TDBEdit
        Left = 93
        Top = 150
        Width = 64
        Height = 20
        DataField = '本月读数'
        DataSource = DataSource5
        TabOrder = 1
        OnEnter = DBEdit4Enter
        OnExit = DBEdit14Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit17: TDBEdit
        Left = 93
        Top = 222
        Width = 64
        Height = 20
        DataField = '应收金额'
        DataSource = DataSource5
        TabOrder = 2
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit18: TDBEdit
        Left = 93
        Top = 246
        Width = 64
        Height = 20
        DataField = '实收金额'
        DataSource = DataSource5
        ReadOnly = True
        TabOrder = 3
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit19: TDBEdit
        Left = 93
        Top = 270
        Width = 64
        Height = 20
        BorderStyle = bsNone
        Color = clSilver
        DataField = '剩余金额'
        DataSource = DataSource5
        Enabled = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 4
      end
      object DateTimePicker3: TDateTimePicker
        Left = 181
        Top = 102
        Width = 20
        Height = 20
        CalAlignment = dtaLeft
        Date = 37186
        Time = 37186
        DateFormat = dfLong
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 5
        OnCloseUp = DateTimePicker3CloseUp
      end
      object DateTimePicker4: TDateTimePicker
        Left = 181
        Top = 126
        Width = 20
        Height = 20
        CalAlignment = dtaLeft
        Date = 37186
        Time = 37186
        DateFormat = dfLong
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 6
        OnCloseUp = DateTimePicker4CloseUp
      end
      object DBEdit5: TDBEdit
        Left = 93
        Top = 102
        Width = 87
        Height = 20
        DataField = '计费起始日期'
        DataSource = DataSource5
        MaxLength = 10
        TabOrder = 7
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit6: TDBEdit
        Left = 93
        Top = 126
        Width = 87
        Height = 20
        DataField = '计费终止日期'
        DataSource = DataSource5
        MaxLength = 10
        TabOrder = 8
        OnEnter = DBEdit4Enter
        OnExit = DBEdit4Exit
        OnKeyPress = DBEdit4KeyPress
      end
      object DBEdit20: TDBEdit
        Left = 93
        Top = 176
        Width = 64
        Height = 20
        DataField = '上月读数'
        DataSource = DataSource5
        TabOrder = 9
      end
    end
    object TabSheet3: TTabSheet
      Caption = '煤气表'
      ImageIndex = 2
      object Label25: TLabel
        Left = 8
        Top = 10
        Width = 72
        Height = 12
        Caption = '煤气表编号:'
      end
      object Label26: TLabel
        Left = 8
        Top = 34
        Width = 60
        Height = 12
        Caption = '户主姓名:'
      end
      object Label27: TLabel
        Left = 8
        Top = 58
        Width = 60
        Height = 12
        Caption = '收费标准:'
      end
      object Label28: TLabel
        Left = 8
        Top = 81
        Width = 60
        Height = 12
        Caption = '收费金额:'
        FocusControl = DBEdit15
      end
      object DBText11: TDBText
        Left = 91
        Top = 8
        Width = 65
        Height = 17
        DataField = '煤气表编号'
        DataSource = DataSource6
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBText12: TDBText
        Left = 91
        Top = 32
        Width = 65
        Height = 17
        DataField = '户主姓名'
        DataSource = DataSource6
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBText13: TDBText
        Left = 91
        Top = 56
        Width = 65
        Height = 17
        DataField = '收费标准'
        DataSource = DataSource6
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label29: TLabel
        Left = 8
        Top = 106
        Width = 84
        Height = 12
        Caption = '计费起始日期:'
      end
      object Label30: TLabel
        Left = 8
        Top = 130
        Width = 84
        Height = 12
        Caption = '计费终止日期:'
      end
      object Label31: TLabel
        Left = 8
        Top = 154
        Width = 60
        Height = 12
        Caption = '本月读数:'
        FocusControl = DBEdit3
      end
      object Label32: TLabel
        Left = 8
        Top = 178
        Width = 60
        Height = 12
        Caption = '上月读数:'
      end
      object Label33: TLabel
        Left = 8
        Top = 202
        Width = 48
        Height = 12
        Caption = '使用数:'
      end
      object Label34: TLabel
        Left = 8
        Top = 226
        Width = 60
        Height = 12
        Caption = '应收金额:'
        FocusControl = DBEdit21
      end
      object Label35: TLabel

⌨️ 快捷键说明

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