ydyhdagl.dfm

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

object Fyhdagl: TFyhdagl
  Left = 19
  Top = 81
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '用户档案管理'
  ClientHeight = 415
  ClientWidth = 701
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 480
    Top = 3
    Width = 50
    Height = 38
    Caption = '查询'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000130B0000130B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      888800000888880000080F000888880F00080F000888880F0008000000080000
      000800F000000F00000800F000800F00000800F000800F000008800000000000
      0088880F00080F000888880000080000088888800088800088888880F08880F0
      888888800088800088888888888888888888}
    Layout = blGlyphTop
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 533
    Top = 3
    Width = 50
    Height = 38
    Caption = '打印'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
      0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
      080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
      8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
      F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
    Layout = blGlyphTop
  end
  object SpeedButton3: TSpeedButton
    Left = 586
    Top = 3
    Width = 50
    Height = 38
    Caption = '帮助'
    Flat = True
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
      FFFFFFFFFFF000FFFFFFFFFFFF0BB00FFFFFFFFFFF0BB00FFFFFFFFFFFF00FFF
      FFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0BB00F
      FFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B00FFFFFF0BB000BB0
      0FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFF}
    Layout = blGlyphTop
  end
  object SpeedButton4: TSpeedButton
    Left = 639
    Top = 3
    Width = 50
    Height = 38
    Caption = '退出'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
      FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
      0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
      4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
      F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
    Layout = blGlyphTop
    OnClick = SpeedButton4Click
  end
  object Panel1: TPanel
    Left = 8
    Top = 0
    Width = 451
    Height = 41
    BevelInner = bvLowered
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 144
      Top = 10
      Width = 26
      Height = 13
      Caption = '户号'
    end
    object Label2: TLabel
      Left = 264
      Top = 10
      Width = 26
      Height = 13
      Caption = '户名'
    end
    object Label3: TLabel
      Left = 12
      Top = 10
      Width = 26
      Height = 13
      Caption = '区号'
    end
    object DBEdit1: TDBEdit
      Left = 296
      Top = 5
      Width = 137
      Height = 21
      DataField = 'YD_YHMC'
      DataSource = YDData.DSbzyhda
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      OnDblClick = SpeedButton1Click
    end
    object DBEdit22: TDBEdit
      Left = 176
      Top = 5
      Width = 73
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      OnDblClick = SpeedButton1Click
    end
    object DBEdit2: TDBEdit
      Left = 44
      Top = 5
      Width = 82
      Height = 21
      DataField = 'YD_QH'
      DataSource = YDData.DSbzyhda
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      OnDblClick = SpeedButton1Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 3
    Top = 171
    Width = 696
    Height = 113
    DataSource = YDData.DSdbcs
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'DB_ZFGX'
        Title.Alignment = taCenter
        Title.Caption = '总分码'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_CH'
        Title.Alignment = taCenter
        Title.Caption = '出厂编号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_CM'
        Title.Alignment = taCenter
        Title.Caption = '生产厂名'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_DBLB'
        Title.Alignment = taCenter
        Title.Caption = '电表类别'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_SD'
        Title.Alignment = taCenter
        Title.Caption = '时段'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_CBBJ'
        Title.Alignment = taCenter
        Title.Caption = '抄表标记'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_DDDJ'
        Title.Alignment = taCenter
        Title.Caption = '电价'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_JFJBZ'
        Title.Alignment = taCenter
        Title.Caption = '附加'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_DD'
        Title.Alignment = taCenter
        Title.Caption = '底度/比/量'
        Width = 71
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_TZXS'
        Title.Alignment = taCenter
        Title.Caption = '调整系数'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_ZBRQ'
        Title.Alignment = taCenter
        Title.Caption = '装表日期'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DB_SYS'
        Title.Alignment = taCenter
        Title.Caption = '是否暂停'
        Visible = True
      end>
  end
  object DBGrid2: TDBGrid
    Left = 4
    Top = 290
    Width = 345
    Height = 121
    DataSource = YDData.DSjjjl
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'JJ_JJDM'
        Title.Alignment = taCenter
        Title.Caption = '加价代码'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJ_MC'
        Title.Alignment = taCenter
        Title.Caption = '加价名称'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJ_DJ'
        Title.Alignment = taCenter
        Title.Caption = '单价'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJ_JJBL'
        Title.Alignment = taCenter
        Title.Caption = '比例'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJ_JJDL'
        Title.Alignment = taCenter
        Title.Caption = '加价电量'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'JJ_JJJE'
        Title.Alignment = taCenter
        Title.Caption = '加价金额'
        Visible = True
      end>
  end
  object Panel2: TPanel
    Left = 4
    Top = 46
    Width = 695
    Height = 121
    BevelInner = bvLowered
    BevelOuter = bvNone
    Enabled = False
    TabOrder = 3
    object Label5: TLabel
      Left = 171
      Top = 16
      Width = 26
      Height = 13
      Caption = '地址'
    end
    object Label6: TLabel
      Left = 418
      Top = 16
      Width = 26
      Height = 13
      Caption = '电话'
    end
    object Label7: TLabel