ydbmgz.dfm

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

        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
        FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
        0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
        4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
        F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = SpeedButton10Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 120
    Width = 474
    Height = 163
    Color = clInfoBk
    DataSource = YDData.DataSource5
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'BMMC'
        Title.Alignment = taCenter
        Title.Caption = '编码名称'
        Width = 76
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BM1'
        PickList.Strings = (
          '')
        Title.Alignment = taCenter
        Title.Caption = '一级长度'
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BM2'
        Title.Alignment = taCenter
        Title.Caption = '二级长度'
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BM3'
        Title.Alignment = taCenter
        Title.Caption = '三级长度'
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BM4'
        Title.Alignment = taCenter
        Title.Caption = '四级长度'
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BMCD'
        Title.Alignment = taCenter
        Title.Caption = '编码长度'
        Width = 56
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BMXS'
        Title.Alignment = taCenter
        Title.Caption = '编码形式'
        Width = 96
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 2
    Top = 48
    Width = 472
    Height = 70
    BevelOuter = bvLowered
    Enabled = False
    TabOrder = 2
    object Label1: TLabel
      Left = 14
      Top = 15
      Width = 52
      Height = 13
      Caption = '编码名称'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 14
      Top = 44
      Width = 52
      Height = 13
      Caption = '一级长度'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 134
      Top = 44
      Width = 52
      Height = 13
      Caption = '二级长度'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 248
      Top = 44
      Width = 52
      Height = 13
      Caption = '三级长度'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 362
      Top = 44
      Width = 52
      Height = 13
      Caption = '四级长度'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 73
      Top = 8
      Width = 155
      Height = 21
      DataField = 'BMMC'
      DataSource = YDData.DataSource5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object DBComboBox1: TDBComboBox
      Left = 73
      Top = 37
      Width = 41
      Height = 21
      DataField = 'BM1'
      DataSource = YDData.DataSource5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      ParentFont = False
      TabOrder = 1
      OnExit = DBComboBox1Exit
    end
    object DBComboBox2: TDBComboBox
      Left = 190
      Top = 37
      Width = 39
      Height = 21
      DataField = 'BM2'
      DataSource = YDData.DataSource5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      ParentFont = False
      TabOrder = 2
      OnExit = DBComboBox2Exit
    end
    object DBComboBox3: TDBComboBox
      Left = 304
      Top = 37
      Width = 45
      Height = 21
      DataField = 'BM3'
      DataSource = YDData.DataSource5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      ParentFont = False
      TabOrder = 3
      OnExit = DBComboBox3Exit
    end
    object DBComboBox4: TDBComboBox
      Left = 413
      Top = 37
      Width = 41
      Height = 21
      DataField = 'BM4'
      DataSource = YDData.DataSource5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      ParentFont = False
      TabOrder = 4
      OnExit = DBComboBox4Exit
    end
  end
end