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

📄 ydywsl.dfm

📁 营业用电管理系统(网络版)是本公司推出的新一代软件产品
💻 DFM
📖 第 1 页 / 共 2 页
字号:
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton
      Left = 263
      Top = 6
      Width = 63
      Height = 26
      Caption = '查找'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        04000000000078000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888800000888880000080F000888880F00080F000888880F0008000000080000
        000800F000000F00000800F000800F00000800F000800F000008800000000000
        0088880F00080F000888880000080000088888800088800088888880F08880F0
        888888800088800088888888888888888888}
      ParentFont = False
      OnClick = SpeedButton5Click
    end
    object SpeedButton6: TSpeedButton
      Left = 326
      Top = 6
      Width = 63
      Height = 26
      Caption = '新增'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        04000000000078000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888888800000000000888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFF
        F0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFF
        F0888880FFFFFFFFF0888880FFFFFF0000888880FFFFFF0F08888880FFFFFF00
        888888800000000888888888888888888888}
      ParentFont = False
      OnClick = SpeedButton6Click
    end
    object SpeedButton7: TSpeedButton
      Left = 390
      Top = 6
      Width = 63
      Height = 26
      Caption = '修改'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFF
        F0F0F0F0FFFFFFFFC0C0FFFFFFFFFFF00FFFFFFFC0C0FFFFFFFFFFF000FFFFFF
        C0C0FFF000000000B70FFFFFC0C0FFF0FFFFFFF0B80FFFFFC0C0FFF0F00F00F0
        0B70FFFFC0C0FFF0FFFFFFFF0B80FFFFC0C0FFF0CCCCCCCCC0B70FFFC0C0FFFF
        CFFFFFFFF0B00FFFC0C0FFFFCF00F00F000110FFC0C0FFFFCFFFFFFFFF000FFF
        C0C0FFFFCCCCCCCCCCCCFFFFC0C0FFFFC8CC8CC8CC8CFFFFC0C0FFFFCCCCCCCC
        CCCCFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFFFFFFFFFFFFFFFFFFC0C0FFFF
        FFFFFFFFFFFFFFFFC0C0}
      ParentFont = False
      OnClick = SpeedButton7Click
    end
    object SpeedButton8: TSpeedButton
      Left = 453
      Top = 6
      Width = 63
      Height = 26
      Caption = '删除'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888888888888888888808888888888088800088888888888880000888888
        8088888000888888088888880008888008888888800088008888888888000008
        8888888888800088888888888800000888888888800088008888888000088880
        0888880000888888008888000888888888088888888888888888}
      ParentFont = False
      OnClick = SpeedButton8Click
    end
    object SpeedButton9: TSpeedButton
      Left = 581
      Top = 6
      Width = 63
      Height = 26
      Caption = '帮助'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFF000FFFFFFFFFFFF0BB00FFFFFFFFFFF0BB00FFFFFFFFFFFF00FFF
        FFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0BB00F
        FFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B00FFFFFF0BB000BB0
        0FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFF}
      ParentFont = False
    end
    object SpeedButton10: TSpeedButton
      Left = 645
      Top = 6
      Width = 63
      Height = 26
      Caption = '退出'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
        FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
        0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
        4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
        F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
      ParentFont = False
      OnClick = SpeedButton10Click
    end
    object SpeedButton19: TSpeedButton
      Left = 518
      Top = 6
      Width = 63
      Height = 26
      Caption = '打印'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
        0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
        080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
        8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
        F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
      ParentFont = False
      OnClick = SpeedButton19Click
    end
  end
  object Panel4: TPanel
    Left = 215
    Top = 89
    Width = 511
    Height = 191
    BevelInner = bvLowered
    TabOrder = 1
    object Label24: TLabel
      Left = 16
      Top = 12
      Width = 102
      Height = 16
      Caption = '电表基本情况'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object SpeedButton11: TSpeedButton
      Left = 167
      Top = 10
      Width = 66
      Height = 23
      Caption = '加挂'
      Flat = True
      OnClick = SpeedButton11Click
    end
    object SpeedButton12: TSpeedButton
      Left = 239
      Top = 10
      Width = 66
      Height = 23
      Caption = '修改'
      Flat = True
      OnClick = SpeedButton12Click
    end
    object SpeedButton13: TSpeedButton
      Left = 311
      Top = 10
      Width = 66
      Height = 23
      Caption = '拆除'
      Flat = True
      OnClick = SpeedButton13Click
    end
    object SpeedButton14: TSpeedButton
      Left = 383
      Top = 10
      Width = 66
      Height = 23
      Caption = '停/复'
      Flat = True
      OnClick = SpeedButton14Click
    end
    object DBGrid1: TDBGrid
      Left = 7
      Top = 37
      Width = 490
      Height = 145
      Color = clWhite
      DataSource = YDData.DSdbda
      Options = [dgEditing, dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'dbbh'
          Title.Alignment = taCenter
          Title.Caption = '表号'
          Width = 44
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'dblb'
          Title.Alignment = taCenter
          Title.Caption = '电表类别'
          Width = 65
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'bl'
          Title.Alignment = taCenter
          Title.Caption = '倍率'
          Width = 44
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ws'
          Title.Alignment = taCenter
          Title.Caption = '表位'
          Width = 41
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fx'
          Title.Alignment = taCenter
          Title.Caption = '方向'
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'bs'
          Title.Alignment = taCenter
          Title.Caption = '变损'
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'xs'
          Title.Alignment = taCenter
          Title.Caption = '线损'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'bsf'
          Title.Alignment = taCenter
          Title.Caption = '表损'
          Width = 47
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'bz'
          Title.Alignment = taCenter
          Title.Caption = '套接'
          Width = 68
          Visible = True
        end>
    end
  end
  object Panel5: TPanel
    Left = 215
    Top = 292
    Width = 511
    Height = 164
    BevelInner = bvLowered
    BevelOuter = bvNone
    TabOrder = 2
    object Label25: TLabel
      Left = 16
      Top = 20
      Width = 136
      Height = 16
      Caption = '执行电价基本情况'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object SpeedButton15: TSpeedButton
      Left = 231
      Top = 17
      Width = 67
      Height = 24
      Caption = '增加'
      Flat = True
      OnClick = SpeedButton15Click
    end
    object SpeedButton16: TSpeedButton
      Left = 303
      Top = 17
      Width = 67
      Height = 24
      Caption = '修改'
      Flat = True
      OnClick = SpeedButton16Click
    end
    object SpeedButton17: TSpeedButton
      Left = 375
      Top = 17
      Width = 67
      Height = 24
      Caption = '删除'
      Flat = True
      OnClick = SpeedButton17Click
    end
    object DBGrid2: TDBGrid
      Left = 7
      Top = 47
      Width = 490
      Height = 108
      DataSource = YDData.DSdjkp
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'kh'
          Title.Alignment = taCenter
          Title.Caption = '卡片编号'
          Width = 58
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'lb'
          Title.Alignment = taCenter
          Title.Caption = '用电类别'
          Width = 110
          Visible = True
        end
        item
          Color = clInfoBk
          Expanded = False
          FieldName = 'gfbl'
          Title.Alignment = taCenter
          Title.Caption = '高峰比例'
          Width = 65
          Visible = True
        end
        item
          Color = clInfoBk
          Expanded = False
          FieldName = 'jsfsf'
          Title.Alignment = taCenter
          Title.Caption = '计算方式(峰)'
          Width = 86
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pdbl'
          Title.Alignment = taCenter
          Title.Caption = '平段比例'
          Width = 66
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'jsfsp'
          Title.Alignment = taCenter
          Title.Caption = '计算方法(平)'
          Width = 85
          Visible = True
        end
        item
          Color = clAqua
          Expanded = False
          FieldName = 'dgbl'
          Title.Alignment = taCenter
          Title.Caption = '低谷比例'
          Visible = True
        end
        item
          Color = clAqua
          Expanded = False
          FieldName = 'jsfsg'
          Title.Alignment = taCenter
          Title.Caption = '计算方式(谷)'
          Width = 88
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 4
    Top = 44
    Width = 722
    Height = 36
    TabOrder = 3
    object Label1: TLabel
      Left = 9
      Top = 10
      Width = 52
      Height = 13
      Caption = '用户编号'
    end
    object Label2: TLabel
      Left = 231
      Top = 10
      Width = 52
      Height = 13
      Caption = '用户名称'
    end
    object Label26: TLabel
      Left = 447
      Top = 10
      Width = 52
      Height = 13
      Caption = '用户地址'
    end
    object DBEdit1: TDBEdit
      Left = 83
      Top = 7
      Width = 100
      Height = 21
      Color = clInfoBk
      DataField = 'hhhh'
      DataSource = YDData.DSyhda
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 293
      Top = 7
      Width = 124
      Height = 21
      Color = clInfoBk
      DataField = 'yhmc'
      DataSource = YDData.DSyhda
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit10: TDBEdit
      Left = 509
      Top = 7
      Width = 196
      Height = 21
      Color = clInfoBk
      DataField = 'yhdz'
      DataSource = YDData.DSyhda
      TabOrder = 2
    end
  end
end

⌨️ 快捷键说明

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