readdata.dfm

Monitor.dfm Meter.dpr pasMain.pas

        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888800000
        000088888880FFFFFFF088888880F00F00F088888880FFFFFFF088888880F00F
        00F088888880FFFFFFF088888884444444448800008444444444880AA0888888
        8888000AA000888888880AAAAAA0888888880AAAAAA088888888000AA0008888
        8888880AA088888888888800008888888888}
      Layout = blGlyphTop
      Spacing = 2
      OnClick = btnAppendClick
    end
    object btnDelete: TSpeedButton
      Left = 616
      Top = 55
      Width = 41
      Height = 38
      Caption = '删除'
      Enabled = False
      Flat = True
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        04000000000078000000120B0000120B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888800000
        000088888880FFFFFFF088888880F00F00F088888880FFFFFFF088888880F00F
        00F088888880FFFFFFF088888884444444448888888444444444888888888888
        8888000000008888888809999990888888880999999088888888000000008888
        888888888888888888888888888888888888}
      Layout = blGlyphTop
      Spacing = 2
      OnClick = btnDeleteClick
    end
    object Bevel1: TBevel
      Left = 567
      Top = 56
      Width = 3
      Height = 35
      Style = bsRaised
    end
    object Bevel2: TBevel
      Left = 564
      Top = 56
      Width = 3
      Height = 35
      Style = bsRaised
    end
    object Bevel3: TBevel
      Left = 790
      Top = 56
      Width = 3
      Height = 35
      Style = bsRaised
    end
    object Bevel4: TBevel
      Left = 793
      Top = 56
      Width = 3
      Height = 35
      Style = bsRaised
    end
    object Label16: TLabel
      Left = 297
      Top = 30
      Width = 36
      Height = 12
      Caption = '平电量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label17: TLabel
      Left = 297
      Top = 51
      Width = 36
      Height = 12
      Caption = '谷电量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label18: TLabel
      Left = 297
      Top = 73
      Width = 36
      Height = 12
      Caption = '尖电量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label19: TLabel
      Left = 297
      Top = 8
      Width = 36
      Height = 12
      Caption = '峰电量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object SpeedButton2: TSpeedButton
      Left = 660
      Top = 55
      Width = 41
      Height = 38
      Caption = '插入'
      Enabled = False
      Flat = True
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        04000000000078000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888800000
        000088888880FFFFFFF088888880F00F00F088888880FFFFFFF088888880F00F
        00F088888880FFFFFFF088888884444444448800008444444444880BB0888888
        8888000BB000888888880BBBBBB0888888880BBBBBB088888888000BB0008888
        8888880BB088888888888800008888888888}
      Layout = blGlyphTop
      Spacing = 2
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 748
      Top = 54
      Width = 41
      Height = 38
      Caption = '查询'
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      Glyph.Data = {
        EE000000424DEE000000000000007600000028000000100000000F0000000100
        04000000000078000000120B0000120B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        888844444888884444484F444888884F44484F444888884F4448444444484444
        444844F444444F44444844F444844F44444844F444844F444448844444444444
        4488884F44484F444888884444484444488888844488844488888884F48884F4
        888888844488844488888888888888888888}
      Layout = blGlyphTop
      ParentFont = False
      Spacing = 2
      OnClick = SpeedButton3Click
    end
    object UNO_E: TEdit
      Left = 51
      Top = 7
      Width = 95
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 12
      ParentFont = False
      TabOrder = 0
    end
    object ADDRESS_E: TEdit
      Left = 51
      Top = 70
      Width = 95
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 22
      ParentFont = False
      TabOrder = 3
    end
    object NAME_E: TEdit
      Left = 51
      Top = 49
      Width = 95
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 16
      ParentFont = False
      TabOrder = 2
    end
    object SCP_E: TEdit
      Left = 212
      Top = 28
      Width = 67
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 8
      ParentFont = False
      TabOrder = 5
    end
    object FIG_E: TEdit
      Left = 212
      Top = 7
      Width = 67
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 10
      ParentFont = False
      TabOrder = 4
      Text = '0.00'
    end
    object MODEL_E: TEdit
      Left = 487
      Top = 9
      Width = 74
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 14
      ParentFont = False
      TabOrder = 8
    end
    object DNO_E: TEdit
      Left = 487
      Top = 71
      Width = 74
      Height = 20
      TabStop = False
      Color = clSilver
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 5
      ParentFont = False
      TabOrder = 13
    end
    object MNO_E: TEdit
      Left = 51
      Top = 28
      Width = 95
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 15
      ParentFont = False
      TabOrder = 1
    end
    object CNST_E: TEdit
      Left = 212
      Top = 49
      Width = 67
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 4
      ParentFont = False
      TabOrder = 6
    end
    object PHS_E: TComboBox
      Left = 635
      Top = 9
      Width = 124
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 12
      MaxLength = 1
      ParentFont = False
      TabOrder = 11
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3')
    end
    object BY_E: TEdit
      Left = 487
      Top = 50
      Width = 74
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 12
      ParentFont = False
      TabOrder = 10
    end
    object AMP_E: TEdit
      Left = 212
      Top = 70
      Width = 67
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 3
      ParentFont = False
      TabOrder = 7
      Text = '1'
    end
    object USG_E: TComboBox
      Left = 487
      Top = 29
      Width = 74
      Height = 20
      Color = clWhite
      ItemHeight = 12
      MaxLength = 20
      TabOrder = 9
    end
    object BYS_E: TComboBox
      Left = 795
      Top = 30
      Width = 124
      Height = 20
      Color = clWhite
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'