autotest.dfm

Monitor.dfm Meter.dpr pasMain.pas

object frmTestArg: TfrmTestArg
  Left = 183
  Top = 110
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 
    '定时抄表参数设置 Setup Time Parameters of  Timing Meter Reading ' +
    'for Testing'
  ClientHeight = 366
  ClientWidth = 512
  Color = clSilver
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    000001000300202002000000000030010000360000002020080000000000E802
    0000660100002020100000000000E80200004E04000028000000200000004000
    0000010001000000000000010000000000000000000000000000000000000000
    0000FFFFFF0000000000000000003FFFFFF83FFFFFF83000001837FFFFD837FE
    FFD837FFFFD837FFFFD8377FFFD837BFFFD837DFFFD837EFFFD837F6FFD837FA
    FFD837FCFFD835F8035837FE7FD837FEBFD837FEFFD837FEFFD837FEFFD837FE
    FFD837FEFFD837FFFFD837FEFFD837FFFFD8300000183FFFFFF83FFFFFF80000
    000000000000FFFFFFFFC0000007800000038000000380000003800000038000
    0003800000038000000380000003800000038000000380000003800000038000
    0003800000038000000380000003800000038000000380000003800000038000
    000380000003800000038000000380000003800000038000000380000003C000
    0007FFFFFFFF2800000020000000400000000100040000000000800200000000
    0000000000000000000000000000000000000000800000800000008080008000
    0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
    0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
    0000000000000000000000000000009999999999999999999999999990000099
    9999999999999999999999999000009900000000000000000000000990000099
    0FFFFFFFFFFFFFFFFFFFFF09900000990FFFFFFFFFF0FFFFFFFFFF0990000099
    0FFFFFFFFFFFFFFFFFFFFF09900000990FFFFFFFFFFFFFFFFFFFFF0990000099
    0FFF0FFFFFFFFFFFFFFFFF09900000990FFFF0FFFFFFFFFFFFFFFF0990000099
    0FFFFF0FFFFFFFFFFFFFFF09900000990FFFFFF0FFFFFFFFFFFFFF0990000099
    0FFFFFFF0FF0FFFFFFFFFF09900000990FFFFFFFF0F0FFFFFFFFFF0990000099
    0FFFFFFFFF00FFFFFFFFFF09900000990F0FFFFFF000000000FF0F0990000099
    0FFFFFFFFFF00FFFFFFFFF09900000990FFFFFFFFFF0F0FFFFFFFF0990000099
    0FFFFFFFFFF0FFFFFFFFFF09900000990FFFFFFFFFF0FFFFFFFFFF0990000099
    0FFFFFFFFFF0FFFFFFFFFF09900000990FFFFFFFFFF0FFFFFFFFFF0990000099
    0FFFFFFFFFF0FFFFFFFFFF09900000990FFFFFFFFFFFFFFFFFFFFF0990000099
    0FFFFFFFFFF0FFFFFFFFFF09900000990FFFFFFFFFFFFFFFFFFFFF0990000099
    0000000000000000000000099000009999999999999999999999999990000099
    9999999999999999999999999000000000000000000000000000000000000000
    0000000000000000000000000000FFFFFFFFC000000780000003800000038000
    0003800000038000000380000003800000038000000380000003800000038000
    0003800000038000000380000003800000038000000380000003800000038000
    0003800000038000000380000003800000038000000380000003800000038000
    000380000003C0000007FFFFFFFF280000002000000040000000010004000000
    0000800200000000000000000000000000000000000000000000000080000080
    00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
    000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000007777777777777777
    7777777777700007777777777777777777777777777700000000000000000000
    0000000007770011111111111111111111111111107700999999999999999999
    9999999910770091000000000000000000000009107700910FFFFFFFFFFFFFFF
    FFFFFF09107700910FFFFFFFFFF0FFFFFFFFFF09107700910FFFFFFFFFFFFFFF
    FFFFFF09107700910FFFFFFFFFFFFFFFFFFFFF09107700910FFF0FFFFFFFFFFF
    FFFFFF09107700910FFFF0FFFFFFFFFFFFFFFF09107700910FFFFF0FFFFFFFFF
    FFFFFF09107700910FFFFFF0FFFFFFFFFFFFFF09107700910FFFFFFF0FF0FFFF
    FFFFFF09107700910FFFFFFFF0F0FFFFFFFFFF09107700910FFFFFFFFF00FFFF
    FFFFFF09107700910F0FFFFFF000000000FF0F09107700910FFFFFFFFFF00FFF
    FFFFFF09107700910FFFFFFFFFF0F0FFFFFFFF09107700910FFFFFFFFFF0FFFF
    FFFFFF09107700910FFFFFFFFFF0FFFFFFFFFF09107700910FFFFFFFFFF0FFFF
    FFFFFF09107700910FFFFFFFFFF0FFFFFFFFFF09107700910FFFFFFFFFF0FFFF
    FFFFFF09107700910FFFFFFFFFFFFFFFFFFFFF09107700910FFFFFFFFFF0FFFF
    FFFFFF09107700910FFFFFFFFFFFFFFFFFFFFF09107700910000000000000000
    0000000910770091111111111111111111111119107000999999999999999999
    99999999100000000000000000000000000000000000F0000001E0000000C000
    0000800000008000000080000000800000008000000080000000800000008000
    0000800000008000000080000000800000008000000080000000800000008000
    0000800000008000000080000000800000008000000080000000800000008000
    000080000000800000008000000180000003C0000007}
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnConnectMode: TSpeedButton
    Left = 319
    Top = 335
    Width = 185
    Height = 24
    Caption = '抄表方式：拨号'
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    Glyph.Data = {
      A2020000424DA20200000000000072000000280000001A000000140000000100
      08000000000030020000C30E0000C30E00000F0000000F000000FFFFFF0000FF
      FF00BFBFBF00AFAFAF00CFCF90000090900080808000007F7F00707070006060
      600000FF00007F7F0000606000007F0000000000000002020202020202020202
      0202020202020202020202020202020200000202020202020202020202020E0E
      0E0E0E0E0E0E0E0E0E0202020000020202020202020E0E0E0E06060606060606
      06060608090E0202000002020E0E0E0E0E0105070E060002020202020E0E0E02
      090E02020000020206060606060707070E0600000000000000000000090E0202
      00000202020202020202060E0006060E0E0E0E0E0E0E0E0E090E020200000202
      020E0E0E0E0E0E0E0E0E060202020202020202090E0E02020000020208060606
      06060606060606000E060606080602090E02020200000202060002020202020E
      0E0E06000E0B0C0C0C0602090E02020200000202060000000000000000000600
      0E0B0B0C0C0602090E0202020000020202060E0E0E0E0E0E0E0E06000E040B0B
      0C0602090E020202000002020206020202020202020206000E0E0E0E0E0E0209
      0E020202000002020206000E0D0D0D0D0D02060000000000000003090E020202
      000002020206000E0A0A0A0A0D02060606060606080606060202020200000202
      0206000E0A0A0A0A0D020609020202020202020202020202000002020206000E
      0A0A0A0A0D020609020202020202020202020202000002020206000E0E0E0E0E
      0E02060902020202020202020202020200000202020600000000000000020609
      0202020202020202020202020000020202020606060606060606060202020202
      0202020202020202000002020202020202020202020202020202020202020202
      020202020000}
    ParentFont = False
    OnClick = btnConnectModeClick
  end
  object Work_btn: TButton
    Left = 319
    Top = 288
    Width = 87
    Height = 22
    Caption = '启动测试'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = Work_btnClick
  end
  object Button2: TButton
    Left = 416
    Top = 253
    Width = 87
    Height = 22
    Caption = '装载参数'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button4: TButton
    Left = 319
    Top = 254
    Width = 87
    Height = 22
    Caption = '保存参数'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 417
    Top = 288
    Width = 87
    Height = 22
    Caption = '退出'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = Button5Click
  end
  object ListView1: TListView
    Left = 1
    Top = 0
    Width = 509
    Height = 122
    Hint = 'Double Click to Select Testing Concentrator'
    Anchors = [akLeft, akTop, akRight]
    Columns = <
      item
        Caption = '台区编号'
        Width = 88
      end
      item
        Caption = '台区名称'
        Width = 135
      end
      item
        Alignment = taRightJustify
        Caption = '电表数量'
        Width = 82
      end
      item
        AutoSize = True
        Caption = '电话号码'
      end>
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    RowSelect = True
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    TabStop = False
    ViewStyle = vsReport
    OnDblClick = ListView1DblClick
  end
  object GroupBox1: TGroupBox
    Left = 311
    Top = 124
    Width = 200
    Height = 110
    Caption = '集中器信息'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    object Label1: TLabel
      Left = 8
      Top = 20
      Width = 48
      Height = 12
      Caption = '台区编号'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 38
      Width = 48
      Height = 12
      Caption = '台区名称'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 57
      Width = 48
      Height = 12
      Caption = '电表数量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 75
      Width = 48
      Height = 12
      Caption = '电话号码'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object editdno: TEdit
      Left = 104
      Top = 18
      Width = 88
      Height = 21
      TabStop = False
      Color = clSilver
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object editname: TEdit
      Left = 104
      Top = 36
      Width = 88
      Height = 21
      TabStop = False
      Color = clSilver
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object editnum: TEdit
      Left = 104
      Top = 54
      Width = 88
      Height = 21
      TabStop = False
      Color = clSilver
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object edittelno: TEdit
      Left = 104
      Top = 72
      Width = 88
      Height = 21
      TabStop = False
      Color = clSilver
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 2
    Top = 124
    Width = 152
    Height = 241
    Caption = '定时抄表时段序列'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    object List1: TListBox
      Left = 5
      Top = 18
      Width = 141
      Height = 217
      Hint = 'Double Click to Delete the Time'
      TabStop = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      Sorted = True
      TabOrder = 0
      OnClick = List1Click
      OnDblClick = List1DblClick
    end
  end
  object GroupBox3: TGroupBox
    Left = 154
    Top = 124
    Width = 157
    Height = 241
    Caption = '编辑抄表时间'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    object edittime: TEdit
      Left = 5
      Top = 18
      Width = 116
      Height = 21
      Hint = 'Time Format: YYYY-MM-DD HH:MM:SS'
      TabStop = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      Text = '####-##-## '
    end
    object List2: TListBox
      Left = 5
      Top = 36
      Width = 146
      Height = 199
      TabStop = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 2
      OnClick = List2Click
    end
    object btnAddTime: TButton
      Left = 122
      Top = 18
      Width = 29
      Height = 18
      Caption = '&Add'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TabStop = False
      OnClick = btnAddTimeClick
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 308
    Top = 84
  end
end