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

📄 ydycjl.dfm

📁 营业用电管理系统(网络版)是本公司推出的新一代软件产品
💻 DFM
📖 第 1 页 / 共 2 页
字号:
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        0400000000007800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
        FFFFFFFF00FFFFFFFFFFFFF030FFFFFFFFFFFF0330FFFFFFFFFF003330000000
        0FFFF03330FF0FFFFFFFF03300FF0FFFF4FFF03330FF0FFF44FFF03330FF0FF4
        4444F03330FF0F444444F03330FF0FF44444F0330FFF0FFF44FFF030FFFF0FFF
        F4FFF00FFFFF0FFFFFFFF00000000FFFFFFF}
      Layout = blGlyphTop
      ParentFont = False
      OnClick = SpeedButton10Click
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 48
    Width = 457
    Height = 113
    BevelInner = bvLowered
    BevelOuter = bvNone
    Enabled = False
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 18
      Width = 26
      Height = 13
      Caption = '表组'
    end
    object Label2: TLabel
      Left = 152
      Top = 18
      Width = 39
      Height = 13
      Caption = '总分码'
    end
    object Label3: TLabel
      Left = 327
      Top = 18
      Width = 52
      Height = 13
      Caption = '电表类别'
    end
    object Label4: TLabel
      Left = 16
      Top = 45
      Width = 26
      Height = 13
      Caption = '时段'
    end
    object Label5: TLabel
      Left = 139
      Top = 46
      Width = 52
      Height = 13
      Caption = '抄表标记'
    end
    object Label6: TLabel
      Left = 327
      Top = 46
      Width = 26
      Height = 13
      Caption = '厂号'
    end
    object Shape1: TShape
      Left = 8
      Top = 69
      Width = 441
      Height = 1
    end
    object Shape2: TShape
      Left = 8
      Top = 70
      Width = 441
      Height = 1
      Pen.Color = clNone
    end
    object Label8: TLabel
      Left = 16
      Top = 86
      Width = 52
      Height = 13
      Caption = '扬程级别'
    end
    object Label11: TLabel
      Left = 220
      Top = 87
      Width = 52
      Height = 13
      Caption = '扬程高度'
    end
    object DBEdit1: TDBEdit
      Left = 48
      Top = 13
      Width = 57
      Height = 21
      DataField = 'DB_BZH'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 200
      Top = 13
      Width = 81
      Height = 21
      DataField = 'DB_ZFGX'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 391
      Top = 13
      Width = 49
      Height = 21
      DataField = 'DB_DBLB'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 48
      Top = 40
      Width = 65
      Height = 21
      DataField = 'DB_SD'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 200
      Top = 40
      Width = 57
      Height = 21
      DataField = 'DB_CBBJ'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 367
      Top = 40
      Width = 73
      Height = 21
      DataField = 'DB_CH'
      DataSource = YDData.DSdbcs
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
    end
    object DBEdit7: TDBEdit
      Left = 72
      Top = 81
      Width = 105
      Height = 21
      DataField = 'YC_YCJB'
      DataSource = YDData.DSycjl
      TabOrder = 6
    end
    object DBEdit8: TDBEdit
      Left = 280
      Top = 80
      Width = 73
      Height = 21
      DataField = 'YC_YCGD'
      DataSource = YDData.DSycjl
      TabOrder = 7
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 168
    Width = 457
    Height = 161
    DataSource = YDData.DSycjl
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'YC_SQH'
        Title.Alignment = taCenter
        Title.Caption = '申请号'
        Width = 81
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YC_HH'
        Title.Alignment = taCenter
        Title.Caption = '户号'
        Width = 89
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YC_BZH'
        Title.Alignment = taCenter
        Title.Caption = '表组号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YC_ZFGX'
        Title.Alignment = taCenter
        Title.Caption = '总分号'
        Width = 69
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YC_YCJB'
        Title.Alignment = taCenter
        Title.Caption = '扬程级别'
        Width = 69
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'YC_YCGD'
        Title.Alignment = taCenter
        Title.Caption = '扬程高度'
        Visible = True
      end>
  end
end

⌨️ 快捷键说明

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