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

📄 ydbsjl.dfm

📁 营业用电管理系统(网络版)是本公司推出的新一代软件产品
💻 DFM
📖 第 1 页 / 共 2 页
字号:
        FFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0BB00F
        FFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B00FFFFFF0BB000BB0
        0FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFF}
      Layout = blGlyphTop
      ParentFont = False
    end
    object SpeedButton10: TSpeedButton
      Left = 402
      Top = 2
      Width = 44
      Height = 38
      Caption = '退出'
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      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 = 456
    Height = 106
    BevelInner = bvLowered
    BevelOuter = bvNone
    Enabled = False
    TabOrder = 1
    object Label1: TLabel
      Left = 38
      Top = 14
      Width = 26
      Height = 13
      Caption = '表组'
    end
    object Label2: TLabel
      Left = 164
      Top = 14
      Width = 39
      Height = 13
      Caption = '总分码'
    end
    object Label8: TLabel
      Left = 12
      Top = 81
      Width = 52
      Height = 13
      Caption = '计损设备'
    end
    object Label9: TLabel
      Left = 202
      Top = 81
      Width = 52
      Height = 13
      Caption = '产权单位'
    end
    object Label3: TLabel
      Left = 302
      Top = 13
      Width = 52
      Height = 13
      Caption = '电表类别'
    end
    object Label4: TLabel
      Left = 13
      Top = 42
      Width = 52
      Height = 13
      Caption = '抄表标记'
    end
    object Label5: TLabel
      Left = 180
      Top = 42
      Width = 26
      Height = 13
      Caption = '时段'
    end
    object Shape1: TShape
      Left = 3
      Top = 66
      Width = 446
      Height = 1
    end
    object Shape2: TShape
      Left = 3
      Top = 67
      Width = 446
      Height = 1
      Pen.Color = clNone
    end
    object DBCheckBox1: TDBCheckBox
      Left = 300
      Top = 36
      Width = 81
      Height = 17
      Alignment = taLeftJustify
      Caption = '子表分摊'
      DataField = 'BS_SFFT'
      DataSource = YDData.DSbsjl
      TabOrder = 0
      ValueChecked = '分摊'
      ValueUnchecked = '不分摊'
    end
    object DBEdit7: TDBEdit
      Left = 79
      Top = 76
      Width = 89
      Height = 21
      Hint = '双击选择计损设备'
      Color = clInfoBk
      DataField = 'BS_BSBH'
      DataSource = YDData.DSbsjl
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnDblClick = DBEdit7DblClick
    end
    object DBEdit4: TDBEdit
      Left = 263
      Top = 77
      Width = 176
      Height = 21
      DataField = 'BS_CQDW'
      DataSource = YDData.DSbsjl
      TabOrder = 2
    end
    object DBEdit2: TDBEdit
      Left = 214
      Top = 7
      Width = 65
      Height = 21
      DataField = 'BS_ZFGX'
      DataSource = YDData.DSbsjl
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit1: TDBEdit
      Left = 79
      Top = 8
      Width = 36
      Height = 21
      DataField = 'BS_BZH'
      DataSource = YDData.DSbsjl
      ReadOnly = True
      TabOrder = 4
    end
    object DBEdit3: TDBEdit
      Left = 369
      Top = 7
      Width = 68
      Height = 21
      DataField = 'BS_DBLB'
      DataSource = YDData.DSbsjl
      ReadOnly = True
      TabOrder = 5
    end
    object DBEdit5: TDBEdit
      Left = 79
      Top = 36
      Width = 65
      Height = 21
      DataField = 'BS_CBBJ'
      DataSource = YDData.DSbsjl
      ReadOnly = True
      TabOrder = 6
    end
    object DBEdit6: TDBEdit
      Left = 215
      Top = 36
      Width = 64
      Height = 21
      DataField = 'BS_SD'
      DataSource = YDData.DSbsjl
      ReadOnly = True
      TabOrder = 7
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 158
    Width = 457
    Height = 123
    DataSource = YDData.DSbsjl
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'BS_SQH'
        Title.Alignment = taCenter
        Title.Caption = '申请号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BS_HH'
        Title.Alignment = taCenter
        Title.Caption = '户号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BS_BSBH'
        Title.Alignment = taCenter
        Title.Caption = '设备编号'
        Width = 91
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BS_BZH'
        Title.Alignment = taCenter
        Title.Caption = '表组号'
        Width = 68
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BS_ZFGX'
        Title.Alignment = taCenter
        Title.Caption = '总分号'
        Width = 74
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BS_SFFT'
        Title.Alignment = taCenter
        Title.Caption = '子表分摊'
        Width = 68
        Visible = True
      end>
  end
end

⌨️ 快捷键说明

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