ydmldj.dfm

营业用电管理系统(网络版)是本公司推出的新一代软件产品

object Fmldj: TFmldj
  Left = 137
  Top = 99
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '目录电价设置'
  ClientHeight = 251
  ClientWidth = 476
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 176
    Top = 67
    Width = 52
    Height = 13
    Caption = '电价代码'
  end
  object Label2: TLabel
    Left = 176
    Top = 91
    Width = 52
    Height = 13
    Caption = '电价名称'
  end
  object DBGrid1: TDBGrid
    Left = 2
    Top = 58
    Width = 167
    Height = 191
    BiDiMode = bdLeftToRight
    Color = clInfoBk
    DataSource = YDData.DSmldj
    Options = [dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgRowSelect, dgCancelOnExit]
    ParentBiDiMode = False
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'dy'
        Title.Alignment = taCenter
        Title.Caption = '代码'
        Width = 44
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'lb'
        Title.Alignment = taCenter
        Title.Caption = '电价名称'
        Width = 103
        Visible = True
      end>
  end
  object Panel2: TPanel
    Left = 172
    Top = 113
    Width = 303
    Height = 136
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Color = clWhite
    Enabled = False
    TabOrder = 1
    object Shape1: TShape
      Left = 10
      Top = 7
      Width = 282
      Height = 2
      Pen.Color = clBackground
    end
    object Shape2: TShape
      Left = 10
      Top = 33
      Width = 282
      Height = 1
      Pen.Color = clBackground
    end
    object Shape3: TShape
      Left = 10
      Top = 55
      Width = 281
      Height = 1
      Pen.Color = clBackground
    end
    object Shape4: TShape
      Left = 10
      Top = 77
      Width = 281
      Height = 1
      Pen.Color = clBackground
    end
    object Shape5: TShape
      Left = 10
      Top = 99
      Width = 281
      Height = 1
      Pen.Color = clBackground
    end
    object Shape6: TShape
      Left = 10
      Top = 121
      Width = 281
      Height = 2
      Pen.Color = clBackground
    end
    object Shape8: TShape
      Left = 103
      Top = 7
      Width = 1
      Height = 116
      Pen.Color = clBackground
    end
    object Shape9: TShape
      Left = 166
      Top = 7
      Width = 1
      Height = 116
      Pen.Color = clBackground
    end
    object Shape10: TShape
      Left = 229
      Top = 7
      Width = 1
      Height = 116
      Pen.Color = clBackground
    end
    object Shape11: TShape
      Left = 290
      Top = 7
      Width = 2
      Height = 116
      Pen.Color = clBackground
    end
    object Label5: TLabel
      Left = 22
      Top = 14
      Width = 52
      Height = 13
      Caption = '供电电压'
      WordWrap = True
    end
    object Label6: TLabel
      Left = 121
      Top = 15
      Width = 26
      Height = 13
      Caption = '平段'
    end
    object Label7: TLabel
      Left = 184
      Top = 15
      Width = 26
      Height = 13
      Caption = '高峰'
    end
    object Label8: TLabel
      Left = 246
      Top = 15
      Width = 26
      Height = 13
      Caption = '低谷'
    end
    object Label9: TLabel
      Left = 14
      Top = 38
      Width = 59
      Height = 13
      Caption = '不满1千伏'
    end
    object Label10: TLabel
      Left = 14
      Top = 60
      Width = 54
      Height = 13
      Caption = '1-10千伏'
    end
    object Label11: TLabel
      Left = 14
      Top = 81
      Width = 79
      Height = 13
      Caption = '35千伏及以上'
    end
    object Label12: TLabel
      Left = 14
      Top = 103
      Width = 86
      Height = 13
      Caption = '110千伏及以上'
    end
    object Shape18: TShape
      Left = 9
      Top = 8
      Width = 2
      Height = 115
      Pen.Color = clBackground
    end
    object DBEdit1: TDBEdit
      Left = 106
      Top = 38
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj1'
      DataSource = YDData.DSmldj
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 169
      Top = 38
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj1f'
      DataSource = YDData.DSmldj
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 232
      Top = 38
      Width = 55
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj1g'
      DataSource = YDData.DSmldj
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 106
      Top = 60
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj2'
      DataSource = YDData.DSmldj
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 169
      Top = 60
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj2f'
      DataSource = YDData.DSmldj
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 231
      Top = 60
      Width = 55
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj2g'
      DataSource = YDData.DSmldj
      TabOrder = 5
    end
    object DBEdit10: TDBEdit
      Left = 106
      Top = 104
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj4'
      DataSource = YDData.DSmldj
      TabOrder = 6
    end
    object DBEdit11: TDBEdit
      Left = 169
      Top = 104
      Width = 56
      Height = 16
      BorderStyle = bsNone
      DataField = 'dj4f'
      DataSource = YDData.DSmldj
      TabOrder = 7
    end
    object DBEdit12: TDBEdit
      Left = 232
      Top = 104