power.dfm

Monitor.dfm Meter.dpr pasMain.pas

object frmpower: Tfrmpower
  Left = 259
  Top = 147
  Width = 335
  Height = 282
  BorderIcons = [biSystemMenu]
  Caption = '远程通断电控制 Remote PowerOn And PowerOff'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010002002020100000000000E80200002600000010101000000000002801
    00000E0300002800000020000000400000000100040000000000800200000000
    0000000000000000000000000000000000000000800000800000008080008000
    0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
    0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000110000000003
    70000000000000000001991000000033370000000000000000199B11000007B3
    33700000000000000199B19B1000007B3337000000000000199B19B9B0000007
    B33370000000000199B19B9B000000007B333700000000199B19B9B000000000
    07B3337000000199B19B9B0000000000007B33370000019B19B9B00000000000
    0007B333700019B99B9B00000000000000007B333011099B99B0000000000000
    000007B330B91099BB000000000000000000007B330B910B0000000000000000
    00000007B070B910000000000000000000000000078F0BB00000000000000000
    0000000078F030000000000700000000000000078F0B33370000000770000000
    00000078F007B33370000078870000000000078F00007B333700078800000000
    000078F0000007B3307770800000000000078F000000007B0787870000000000
    7778F000000000007878770000000000788F0000000000008787870000000007
    888F000000000000787880000000000788FF00000000000708880000000000F8
    FF00000000000078800000000000000F00000000000000880000000000000000
    0000000000000800000000000000000000000000000000000000000000000000
    0000000000000000000000000000FFFFFFFFFFFFFF3FF7FFFE1FE3FFFC0FC1FF
    F80780FFF003C07FE003E03FC007F01F800FF80F001FFC07003FFE00007FFF00
    00FFFF8001FFFFC003FFFFE00FFFFFF00FEFFFE00FC7FFC007C3FF820381FF07
    0003FE0F800FF01FC01FE03FE01FE07FE01FC07FE03FC07FC07F80FF80FFC3FF
    87FFEFFF0FFFFFFF3FFFFFFFFFFF280000001000000020000000010004000000
    0000C00000000000000000000000000000000000000000000000000080000080
    00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
    000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
    000000000000037000000009B0000B370000009B990000B3700009B99000000B
    37001B9900000000B3019B90000000000B3B1B0000000000000FB00000000000
    00FB3700070000000F00B37078000000F0000B777000008F000000777000078F
    0000078800000F000000080000000000000000000000FFFF041AFFE700008FC3
    9B1987810000C30307B3E0070000F00FB19BF81F0000FC3B007BF8110000F301
    19B9C78700008F8700078F8F70009F3F9B9BFF7F0000}
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 24
    Top = 258
    Width = 80
    Height = 16
    Caption = '用户表号：'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    Visible = False
  end
  object Image2: TImage
    Left = 24
    Top = 208
    Width = 16
    Height = 15
    AutoSize = True
    Picture.Data = {
      07544269746D6170EE000000424DEE0000000000000076000000280000001000
      00000F000000010004000000000078000000120B0000120B0000100000000000
      0000000000000000800000800000008080008000000080008000808000008080
      8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF0088884000040888888880072AA040888888074722A0070888800007000000
      0088888807004048888888884700040888888880072AA040888888074722A007
      08888000070000000088888807004048888888884700040888888880072AA040
      888888074722A007088880000700000000888888000000088888}
    Visible = False
  end
  object Image3: TImage
    Left = 72
    Top = 208
    Width = 16
    Height = 15
    AutoSize = True
    Picture.Data = {
      07544269746D6170EE000000424DEE0000000000000076000000280000001000
      00000F000000010004000000000078000000120B0000120B0000100000000000
      0000000000000000800000800000008080008000000080008000808000008080
      8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00888840000408888888800719904088888807471190070888800007000000
      0088888807004048888888884700040888888880071990408888880747119007
      0888800007000000008888880700404888888888470004088888888007199040
      8888880747119007088880000700000000888888000000088888}
    Visible = False
  end
  object Image4: TImage
    Left = 136
    Top = 208
    Width = 16
    Height = 16
    AutoSize = True
    Picture.Data = {
      07544269746D6170F6000000424DF60000000000000076000000280000001000
      0000100000000100040000000000800000000000000000000000100000000000
      0000000000000000800000800000008080008000000080008000808000008080
      8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF00FFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFF0BB00FFFFFFFFFFF0BB00F
      FFFFFFFFFFF00FFFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FF
      FFFFFFFFFF0BB00FFFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B0
      0FFFFFF0BB000BB00FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFF
      FFFF}
    Visible = False
  end
  object BitBtn1: TBitBtn
    Left = 16
    Top = 288
    Width = 75
    Height = 0
    Caption = '通电'
    Default = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    Visible = False
    OnClick = BitBtn1Click
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000120B0000120B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888840000408
      88888880072AA040888888074722A00708888000070000000088888807004048
      888888884700040888888880072AA040888888074722A0070888800007000000
      0088888807004048888888884700040888888880072AA040888888074722A007
      088880000700000000888888000000088888}
  end
  object BitBtn2: TBitBtn
    Left = 124
    Top = 288
    Width = 75
    Height = 0
    Caption = '断电'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    Visible = False
    OnClick = BitBtn2Click
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000120B0000120B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888840000408
      8888888007199040888888074711900708888000070000000088888807004048
      8888888847000408888888800719904088888807471190070888800007000000
      0088888807004048888888884700040888888880071990408888880747119007
      088880000700000000888888000000088888}
  end
  object BitBtn3: TBitBtn
    Left = 237
    Top = 304
    Width = 75
    Height = 0
    Caption = '状态'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Visible = False
    OnClick = BitBtn3Click
    Glyph.Data = {
      EE000000424DEE000000000000007600000028000000100000000F0000000100
      04000000000078000000120B0000120B00001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888888888888888888800000000000000080FFFFFFFFFFFFF080F000F000F00
      0F080FFFFFFFFFFFFF080F000F000F000F080FFFFFFFFFFFFF080F000F000F00
      0F080FFFFFFFFFFFFF080FFFFFFFFFFFFF0822222222222222282F222F222F22
      2F2822222222222222288888888888888888}
  end
  object Statuslab: TStatusBar
    Left = 0
    Top = 238
    Width = 327
    Height = 17
    Panels = <>
    SimplePanel = True
    SimpleText = '电表状态'
  end
  object GroupBox1: TGroupBox
    Left = 4
    Top = 12
    Width = 313
    Height = 69
    Caption = '当前电能表状态'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    object Image1: TImage
      Left = 16
      Top = 27
      Width = 16
      Height = 16
      AutoSize = True
      Picture.Data = {
        07544269746D6170F6000000424DF60000000000000076000000280000001000
        0000100000000100040000000000800000000000000000000000100000000000
        0000000000000000800000800000008080008000000080008000808000008080
        8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
        FF00FFFFFFFFFFFFFFFFFFFFFFF000FFFFFFFFFFFF0BB00FFFFFFFFFFF0BB00F
        FFFFFFFFFFF00FFFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FFFFFFFFFFFF0B00FF
        FFFFFFFFFF0BB00FFFFFFFFF00F0BB00FFFFFFF0B00F0BB00FFFFFF0B00FF0B0
        0FFFFFF0BB000BB00FFFFFFF0BBBBB00FFFFFFFFF000000FFFFFFFFFFFFFFFFF
        FFFF}
    end
    object Label5: TLabel
      Left = 41
      Top = 28
      Width = 52
      Height = 13
      Caption = '状态未知'
    end
    object BitBtn4: TBitBtn
      Left = 170
      Top = 28
      Width = 129
      Height = 19
      Caption = '读取通断状态'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BitBtn3Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 6
    Top = 91
    Width = 313
    Height = 103
    Caption = '断送电状态控制'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object Label2: TLabel
      Left = 10
      Top = 31
      Width = 117
      Height = 13
      Caption = '当前用户电能表号：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Uno_E: TEdit
      Left = 10
      Top = 59
      Width = 117
      Height = 21
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 12
      ParentFont = False
      TabOrder = 0
    end
    object BitBtn5: TBitBtn
      Left = 235
      Top = 60
      Width = 63
      Height = 17
      Caption = '断电'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn2Click
    end
    object BitBtn6: TBitBtn
      Left = 170
      Top = 60
      Width = 63
      Height = 17
      Caption = '通电'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn1Click
    end
  end
  object Button1: TButton
    Left = 242
    Top = 209
    Width = 76
    Height = 19
    Caption = '退出(Q)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = Button1Click
  end
end