unit1.~dfm

DV8080—— ——监控报警主机测试源程序

object Form1: TForm1
  Left = 180
  Top = 177
  AutoScroll = False
  Caption = #25253#35686#22120#27979#35797
  ClientHeight = 329
  ClientWidth = 580
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 14
  object Shape16: TShape
    Left = 527
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape15: TShape
    Left = 495
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape14: TShape
    Left = 462
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape13: TShape
    Left = 429
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape12: TShape
    Left = 395
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape11: TShape
    Left = 362
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape10: TShape
    Left = 329
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape9: TShape
    Left = 296
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape8: TShape
    Left = 262
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape7: TShape
    Left = 229
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape6: TShape
    Left = 196
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape5: TShape
    Left = 163
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape4: TShape
    Left = 129
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape3: TShape
    Left = 96
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape2: TShape
    Left = 63
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape1: TShape
    Left = 30
    Top = 124
    Width = 28
    Height = 28
    Brush.Color = clLime
    Pen.Style = psClear
    Shape = stCircle
  end
  object Label1: TLabel
    Left = 92
    Top = 27
    Width = 42
    Height = 14
    Caption = #20018#21475#65306
  end
  object Label2: TLabel
    Left = 252
    Top = 27
    Width = 42
    Height = 14
    Caption = #22320#22336#65306
  end
  object Label3: TLabel
    Left = 28
    Top = 96
    Width = 70
    Height = 14
    Caption = #25253#35686#36755#20837#65306
  end
  object Label4: TLabel
    Left = 39
    Top = 128
    Width = 9
    Height = 16
    Caption = '1'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel
    Left = 71
    Top = 128
    Width = 9
    Height = 16
    Caption = '2'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel
    Left = 104
    Top = 128
    Width = 9
    Height = 16
    Caption = '3'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label7: TLabel
    Left = 137
    Top = 128
    Width = 9
    Height = 16
    Caption = '4'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label8: TLabel
    Left = 170
    Top = 128
    Width = 9
    Height = 16
    Caption = '5'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label9: TLabel
    Left = 203
    Top = 128
    Width = 9
    Height = 16
    Caption = '6'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label10: TLabel
    Left = 236
    Top = 128
    Width = 9
    Height = 16
    Caption = '7'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label11: TLabel
    Left = 269
    Top = 128
    Width = 9
    Height = 16
    Caption = '8'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label12: TLabel
    Left = 301
    Top = 128
    Width = 9
    Height = 16
    Caption = '9'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label13: TLabel
    Left = 334
    Top = 128
    Width = 18
    Height = 16
    Caption = '10'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label14: TLabel
    Left = 367
    Top = 128
    Width = 18
    Height = 16
    Caption = '11'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label15: TLabel
    Left = 400
    Top = 128
    Width = 18
    Height = 16
    Caption = '12'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label16: TLabel
    Left = 433
    Top = 128
    Width = 18
    Height = 16
    Caption = '13'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label17: TLabel
    Left = 466
    Top = 128
    Width = 18
    Height = 16
    Caption = '14'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label18: TLabel
    Left = 499
    Top = 128
    Width = 18
    Height = 16
    Caption = '15'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label19: TLabel
    Left = 531
    Top = 128
    Width = 18
    Height = 16
    Caption = '16'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object SpeedButton1: TSpeedButton
    Left = 402
    Top = 24
    Width = 55
    Height = 22
    AllowAllUp = True
    GroupIndex = 1
    Caption = #25171#24320
    OnClick = SpeedButton1Click
  end
  object Label20: TLabel
    Left = 28
    Top = 184
    Width = 70
    Height = 14
    Caption = #25253#35686#36755#20986#65306
  end
  object Bevel1: TBevel
    Left = -4
    Top = 64
    Width = 585
    Height = 9
  end
  object Bevel2: TBevel
    Left = -4
    Top = 160
    Width = 585
    Height = 9
  end
  object Bevel3: TBevel
    Left = -4
    Top = 288
    Width = 585
    Height = 9
  end
  object CSpinEdit1: TCSpinEdit
    Left = 140
    Top = 24
    Width = 86
    Height = 23
    TabOrder = 0
    Value = 1
  end
  object CSpinEdit2: TCSpinEdit
    Left = 300
    Top = 24
    Width = 86
    Height = 23
    TabOrder = 1
    Value = 1
  end
  object CheckBox1: TCheckBox
    Left = 88
    Top = 217
    Width = 34
    Height = 17
    Caption = '1'
    TabOrder = 2
    OnClick = CheckBox1Click
  end
  object CheckBox2: TCheckBox
    Left = 138
    Top = 217
    Width = 34
    Height = 17
    Caption = '2'
    TabOrder = 3
    OnClick = CheckBox1Click
  end
  object CheckBox3: TCheckBox
    Left = 189
    Top = 217
    Width = 34
    Height = 17
    Caption = '3'
    TabOrder = 4
    OnClick = CheckBox1Click
  end
  object CheckBox4: TCheckBox
    Left = 240
    Top = 217
    Width = 34
    Height = 17
    Caption = '4'
    TabOrder = 5
    OnClick = CheckBox1Click
  end
  object CheckBox5: TCheckBox
    Left = 290
    Top = 217
    Width = 34
    Height = 17
    Caption = '5'
    TabOrder = 6
    OnClick = CheckBox1Click
  end
  object CheckBox6: TCheckBox
    Left = 341
    Top = 217
    Width = 34
    Height = 17
    Caption = '6'
    TabOrder = 7
    OnClick = CheckBox1Click
  end
  object CheckBox7: TCheckBox
    Left = 392
    Top = 217
    Width = 34
    Height = 17
    Caption = '7'
    TabOrder = 8
    OnClick = CheckBox1Click
  end
  object CheckBox8: TCheckBox
    Left = 443
    Top = 217
    Width = 34
    Height = 17
    Caption = '8'
    TabOrder = 9
    OnClick = CheckBox1Click
  end
  object CheckBox9: TCheckBox
    Left = 88
    Top = 249
    Width = 34
    Height = 17
    Caption = '9'
    TabOrder = 10
    OnClick = CheckBox1Click
  end
  object CheckBox10: TCheckBox
    Left = 138
    Top = 249
    Width = 34
    Height = 17
    Caption = '10'
    TabOrder = 11
    OnClick = CheckBox1Click
  end
  object CheckBox11: TCheckBox
    Left = 189
    Top = 249
    Width = 34
    Height = 17
    Caption = '11'
    TabOrder = 12
    OnClick = CheckBox1Click
  end
  object CheckBox12: TCheckBox
    Left = 240
    Top = 249
    Width = 34
    Height = 17
    Caption = '12'
    TabOrder = 13
    OnClick = CheckBox1Click
  end
  object CheckBox13: TCheckBox
    Left = 290
    Top = 249
    Width = 34
    Height = 17
    Caption = '13'
    TabOrder = 14
    OnClick = CheckBox1Click
  end
  object CheckBox14: TCheckBox
    Left = 341
    Top = 249
    Width = 34
    Height = 17
    Caption = '14'
    TabOrder = 15
    OnClick = CheckBox1Click
  end
  object CheckBox15: TCheckBox
    Left = 392
    Top = 249
    Width = 34
    Height = 17
    Caption = '15'
    TabOrder = 16
    OnClick = CheckBox1Click
  end
  object CheckBox16: TCheckBox
    Left = 443
    Top = 249
    Width = 34
    Height = 17
    Caption = '16'
    TabOrder = 17
    OnClick = CheckBox1Click
  end
  object Timer1: TTimer
    Interval = 300
    OnTimer = Timer1Timer
    Left = 240
    Top = 88
  end
end