unit1.dfm

多功能电表测试程序,用于电表参数读取,例如电量,表号等

object Form1: TForm1
  Left = 204
  Top = 130
  BorderStyle = bsSingle
  Caption = #30005#34920#25968#25454#31616#21333#27979#35797
  ClientHeight = 506
  ClientWidth = 690
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object MSComm1: TMSComm
    Left = 600
    Top = 24
    Width = 32
    Height = 32
    OnComm = MSComm1Comm
    ControlData = {
      2143341208000000ED030000ED03000001568A64000006000000010000040000
      00020000802500000000080000000000000000003F00000001000000}
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 690
    Height = 65
    Align = alTop
    TabOrder = 2
    object Label1: TLabel
      Left = 248
      Top = 16
      Width = 168
      Height = 27
      Caption = #30005#34920#25968#25454#27979#35797
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -27
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object BitBtn5: TBitBtn
      Left = 88
      Top = 24
      Width = 75
      Height = 25
      Caption = 'BitBtn5'
      TabOrder = 0
      OnClick = BitBtn5Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 65
    Width = 185
    Height = 441
    Align = alLeft
    TabOrder = 3
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 184
      Height = 136
      Caption = #26597#35810#25968#25454#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object Label2: TLabel
        Left = 5
        Top = 28
        Width = 70
        Height = 14
        Caption = #26597#35810#31867#22411#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 17
        Top = 61
        Width = 56
        Height = 14
        Caption = #25968#25454#39033#65306
      end
      object ComboBox1: TComboBox
        Left = 80
        Top = 24
        Width = 97
        Height = 22
        ItemHeight = 14
        TabOrder = 0
        Text = #35831#36873#25321
        OnClick = ComboBox1Click
        Items.Strings = (
          #34920#21495
          #30005#34920#24120#25968)
      end
      object Edit1: TEdit
        Left = 80
        Top = 56
        Width = 97
        Height = 22
        TabOrder = 1
      end
      object BitBtn1: TBitBtn
        Left = 8
        Top = 96
        Width = 75
        Height = 25
        Caption = #25171#24320#20018#21475
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = BitBtn1Click
      end
      object BitBtn2: TBitBtn
        Left = 96
        Top = 96
        Width = 75
        Height = 25
        Caption = #20851#38381#20018#21475
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = BitBtn2Click
      end
    end
    object GroupBox2: TGroupBox
      Left = 0
      Top = 136
      Width = 185
      Height = 113
      Caption = #21457#36865#21306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object BitBtn3: TBitBtn
        Left = 40
        Top = 16
        Width = 75
        Height = 25
        Caption = #29983#25104#25253#25991
        TabOrder = 0
        OnClick = BitBtn3Click
      end
      object Edit2: TEdit
        Left = 8
        Top = 48
        Width = 177
        Height = 22
        TabOrder = 1
      end
      object BitBtn4: TBitBtn
        Left = 40
        Top = 80
        Width = 75
        Height = 25
        Caption = #21457#36865
        TabOrder = 2
        OnClick = BitBtn4Click
      end
    end
    object GroupBox3: TGroupBox
      Left = 0
      Top = 248
      Width = 185
      Height = 193
      Caption = #25509#25910#21306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object Label4: TLabel
        Left = 5
        Top = 24
        Width = 126
        Height = 14
        Caption = #25910#21040#30005#34920#21457#36865#25253#25991#65306
      end
      object Label5: TLabel
        Left = 8
        Top = 130
        Width = 42
        Height = 14
        Caption = 'Label5'
      end
      object Edit3: TEdit
        Left = 8
        Top = 48
        Width = 169
        Height = 22
        TabOrder = 0
      end
      object Button1: TButton
        Left = 40
        Top = 80
        Width = 75
        Height = 25
        Caption = #35299#26512#25253#25991
        TabOrder = 1
        OnClick = Button1Click
      end
      object Edit4: TEdit
        Left = 64
        Top = 128
        Width = 105
        Height = 22
        TabOrder = 2
      end
    end
  end
  object ListView1: TListView
    Left = 192
    Top = 64
    Width = 497
    Height = 185
    Checkboxes = True
    Color = clMoneyGreen
    Columns = <
      item
        AutoSize = True
        Caption = #36873#25321
      end
      item
        AutoSize = True
        Caption = #25968#25454#39033#35828#26126
      end
      item
        Alignment = taCenter
        AutoSize = True
        Caption = #25968#25454#39033
      end
      item
        Alignment = taCenter
        AutoSize = True
        Caption = #25968#25454#20540
      end
      item
        Alignment = taCenter
        AutoSize = True
        Caption = #21333#20301
      end
      item
        Alignment = taCenter
        AutoSize = True
        Caption = #36890#35759#29366#24577
      end>
    GridLines = True
    HideSelection = False
    Items.Data = {
      A60500001B00000000000000FFFFFFFFFFFFFFFF05000000000000000004B1ED
      BAC5044330333200000000000000FFFFFFFFFFFFFFFF0500000000000000000E
      B5E7B1EDB3A3CAFD28D3D0B9A629044330333000000000000000FFFFFFFFFFFF
      FFFF0500000000000000000EB5E7B1EDB3A3CAFD28CEDEB9A629044330333100
      000000000000FFFFFFFFFFFFFFFF0500000000000000000AC8D5C6DABCB0D6DC
      B4CE044330313000000000000000FFFFFFFFFFFFFFFF05000000000000000004
      CAB1BCE4044330313100000000000000FFFFFFFFFFFFFFFF0500000000000000
      0018B5E7B1EDD4CBD0D0D7B4CCACD7D628BCFBB8BDC2BC423129044330323000
      000000000000FFFFFFFFFFFFFFFF05000000000000000014B5E7CDF8D7B4CCAC
      D7D628BCFBB8BDC2BC423229044330323100000000000000FFFFFFFFFFFFFFFF
      05000000000000000016D6DCD0DDC8D5D7B4CCACD7D628BCFBB8BDC2BC423329
      044330323200000000000000FFFFFFFFFFFFFFFF05000000000000000006D3C3
      BBA7BAC5044330333300000000000000FFFFFFFFFFFFFFFF0500000000000000
      0006C9E8B1B8C2EB044330333400000000000000FFFFFFFFFFFFFFFF05000000
      00000000000CD7EEB4F3D0E8C1BFD6DCC6DA044331313100000000000000FFFF
      FFFFFFFFFFFF05000000000000000008BBACB2EECAB1BCE40443313132000000
      00000000FFFFFFFFFFFFFFFF05000000000000000008D1ADCFD4CAB1BCE40443
      31313300000000000000FFFFFFFFFFFFFFFF05000000000000000008CDA3CFD4
      CAB1BCE4044331313400000000000000FFFFFFFFFFFFFFFF0500000000000000
      0010CFD4CABEB5E7C4DCD0A1CAFDCEBBCAFD044331313500000000000000FFFF
      FFFFFFFFFFFF05000000000000000024CFD4CABEB9A6C2CA28D7EEB4F3D0E8C1
      BF29D0A1CAFDCEBBCAFDD0A1CAFDCEBBCAFD3333044331313600000000000000
      FFFFFFFFFFFFFFFF0500000000000000000CD7D4B6AFB3ADB1EDC8D5C6DA0443
      31313700000000000000FFFFFFFFFFFFFFFF0500000000000000000B2AB8BABA
      C9B4FAB1EDC8D5044331313800000000000000FFFFFFFFFFFFFFFF0500000000
      0000000010D3D0B9A6B5E7C4DCC6F0CABCB6C1CAFD0443313139000000000000
      00FFFFFFFFFFFFFFFF05000000000000000010CEDEB9A6B5E7C4DCC6F0CABCB6
      C1CAFD044331314100000000000000FFFFFFFFFFFFFFFF050000000000000000
      0CCAE4B3F6C2F6B3E5BFEDB6C8044332313100000000000000FFFFFFFFFFFFFF
      FF0500000000000000000EC3DCC2EBC8A8CFDEBCB0C3DCC2EB04433231320000
      0000000000FFFFFFFFFFFFFFFF05000000000000000009C4EACAB1C7F8CAFD50
      044333313000000000000000FFFFFFFFFFFFFFFF0500000000000000000BC8D5
      CAB1B6CEB1EDCAFD71044333313100000000000000FFFFFFFFFFFFFFFF050000
      00000000000017C8D5CAB1B6CE28C3BFC8D5C7D0BBBBCAFD296D3C3D31300443
      33313200000000000000FFFFFFFFFFFFFFFF0500000000000000000BB7D1C2CA
      CAFD6B3C3D3134044333313300000000000000FFFFFFFFFFFFFFFF0500000000
      000000000BB9ABB9B2BCD9C8D5CAFD6E0443333134000000FFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFF}
    ReadOnly = True
    RowSelect = True
    TabOrder = 1
    ViewStyle = vsReport
    OnDblClick = ListView1DblClick
  end
  object Panel3: TPanel
    Left = 192
    Top = 248
    Width = 497
    Height = 65
    BevelOuter = bvSpace
    Caption = 'Panel3'
    TabOrder = 4
    object Label6: TLabel
      Left = 144
      Top = 16
      Width = 192
      Height = 33
      Caption = #36890#35759#25968#25454#30417#25511
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -32
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
  end
  object Memo1: TMemo
    Left = 192
    Top = 320
    Width = 497
    Height = 177
    TabOrder = 5
  end
end