ydyhbgcx.dfm

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

object Fyhbgcx: TFyhbgcx
  Left = 121
  Top = 99
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '用户变更查询'
  ClientHeight = 348
  ClientWidth = 558
  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 = 394
    Top = 8
    Width = 49
    Height = 41
    Caption = '查询'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000130B0000130B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      888800000888880000080F000888880F00080F000888880F0008000000080000
      000800F000000F00000800F000800F00000800F000800F000008800000000000
      0088880F00080F000888880000080000088888800088800088888880F08880F0
      888888800088800088888888888888888888}
    Layout = blGlyphTop
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 448
    Top = 8
    Width = 49
    Height = 41
    Caption = '打印'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0000000000
      0FFFF0888888888080FF000000000000080F0888888FFF88000F088888877788
      080F00000000000008800888888888808080F000000000080800FF0FFFFFFFF0
      8080FFF0F00000F0000FFFF0FFFFFFFF0FFFFFFF0F00000F0FFFFFFF0FFFFFFF
      F0FFFFFFF000000000FFFFFFFFFFFFFFFFFF}
    Layout = blGlyphTop
    OnClick = SpeedButton2Click
  end
  object SpeedButton3: TSpeedButton
    Left = 502
    Top = 8
    Width = 49
    Height = 41
    Caption = '关闭'
    Flat = True
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      0400000000007800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
      FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
      0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
      4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
      F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
    Layout = blGlyphTop
    OnClick = SpeedButton3Click
  end
  object Panel1: TPanel
    Left = 4
    Top = 5
    Width = 381
    Height = 46
    BevelInner = bvLowered
    BevelOuter = bvNone
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 28
      Top = 18
      Width = 60
      Height = 15
      Caption = '变更年月'
    end
    object Label2: TLabel
      Left = 226
      Top = 18
      Width = 60
      Height = 15
      Caption = '变更内容'
    end
    object ComboBox1: TComboBox
      Left = 288
      Top = 15
      Width = 65
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 0
      Text = '新装'
      Items.Strings = (
        '新装'
        '增容'
        '减容'
        '暂停'
        '恢复'
        '暂换'
        '迁址'
        '移表'
        '暂拆'
        '过户'
        '分户'
        '并户'
        '销户'
        '改压'
        '改类')
    end
    object DateTimePicker1: TDateTimePicker
      Left = 97
      Top = 12
      Width = 81
      Height = 23
      CalAlignment = dtaLeft
      Date = 37337
      Time = 37337
      DateFormat = dfShort
      DateMode = dmComboBox
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      Kind = dtkDate
      ParseInput = False
      ParentFont = False
      TabOrder = 1
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 56
    Width = 558
    Height = 296
    DataSource = YDData.QSyhbgcx
    TabOrder = 1
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'YD_QH'
        Title.Caption = '区号'
        Width = 55
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_HH'
        Title.Caption = '户号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_YHMC'
        Title.Caption = '用户名称'
        Width = 68
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_YHDZ'
        Title.Caption = '用户地址'
        Width = 104
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_SQNR'
        Title.Caption = '申请内容'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_YHFL'
        Title.Caption = '用户分类'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_HYDM'
        Title.Caption = '行业代码'
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_HZZM'
        Title.Caption = '核准照明'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_HZDL'
        Title.Caption = '核准动力'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_GDFS'
        Title.Caption = '计量方式'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_GDDY'
        Title.Caption = '供电电压'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_LLBZ'
        Title.Caption = '力率标准'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_JDRQ'
        Title.Caption = '接电日期'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_TFRL'
        Title.Caption = '贴费容量'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_PDTF'
        Title.Caption = '配电贴费'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_GDTF'
        Title.Caption = '供电贴费'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_DBBZ'
        Title.Caption = '电表保证金'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_DFBZ'
        Title.Caption = '电费保证金'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YD_BCTF'
        Title.Caption = '补充贴费'
        Visible = True
      end>
  end
end