object frmMain: TfrmMain
  Left = 0
  Top = 0
  Caption = 'QLight_Lamp Control [Ethernet-type]'
  ClientHeight = 712
  ClientWidth = 850
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'Tahoma'
  Font.Style = []
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 0
    Top = 65
    Width = 409
    Height = 647
    Align = alLeft
    Caption = '[ TEST ] Lamp Control'
    TabOrder = 0
    ExplicitHeight = 694
    object GroupBox2: TGroupBox
      Left = 2
      Top = 121
      Width = 405
      Height = 208
      Align = alTop
      Caption = 'Sound Select'
      TabOrder = 0
      object btnSoundOff: TButton
        Left = 18
        Top = 24
        Width = 367
        Height = 35
        Caption = 'Sound OFF'
        TabOrder = 0
        OnClick = btnSoundClick
      end
      object btnSound1: TButton
        Left = 18
        Top = 72
        Width = 169
        Height = 35
        Caption = 'Fire A-WANG'
        TabOrder = 1
        OnClick = btnSoundClick
      end
      object btnSound2: TButton
        Left = 18
        Top = 116
        Width = 169
        Height = 35
        Caption = 'Emergency'
        TabOrder = 2
        OnClick = btnSoundClick
      end
      object btnSound3: TButton
        Left = 18
        Top = 160
        Width = 169
        Height = 35
        Caption = 'Ambulance'
        TabOrder = 3
        OnClick = btnSoundClick
      end
      object btnSound4: TButton
        Left = 216
        Top = 72
        Width = 169
        Height = 35
        Caption = 'PI-PI-PI'
        TabOrder = 4
        OnClick = btnSoundClick
      end
      object btnSound5: TButton
        Left = 216
        Top = 116
        Width = 169
        Height = 35
        Caption = 'PI_contiune'
        TabOrder = 5
        OnClick = btnSoundClick
      end
    end
    object GroupBox3: TGroupBox
      Left = 2
      Top = 16
      Width = 405
      Height = 105
      Align = alTop
      Caption = 'TCP Setting'
      TabOrder = 1
      DesignSize = (
        405
        105)
      object Label1: TLabel
        Left = 20
        Top = 28
        Width = 38
        Height = 14
        Caption = 'TCP/IP'
      end
      object Label2: TLabel
        Left = 262
        Top = 28
        Width = 38
        Height = 14
        Caption = 'TCP/IP'
      end
      object edtIP1: TEdit
        Left = 72
        Top = 25
        Width = 35
        Height = 22
        TabOrder = 0
        Text = '192'
      end
      object edtIP4: TEdit
        Left = 195
        Top = 25
        Width = 35
        Height = 22
        TabOrder = 1
        Text = '114'
      end
      object edtIP3: TEdit
        Left = 154
        Top = 25
        Width = 35
        Height = 22
        TabOrder = 2
        Text = '200'
      end
      object edtIP2: TEdit
        Left = 113
        Top = 25
        Width = 35
        Height = 22
        TabOrder = 3
        Text = '168'
      end
      object edtPort: TEdit
        Left = 314
        Top = 25
        Width = 73
        Height = 22
        TabOrder = 4
        Text = '20000'
      end
      object btnStatRead: TButton
        Left = 18
        Top = 57
        Width = 367
        Height = 36
        Anchors = [akTop, akRight]
        Caption = 'Stat_Read'
        TabOrder = 5
        OnClick = btnStatReadClick
      end
    end
    object GroupBox5: TGroupBox
      Left = 2
      Top = 329
      Width = 405
      Height = 316
      Align = alClient
      Caption = 'LED Control'
      TabOrder = 2
      ExplicitLeft = 195
      ExplicitTop = 102
      ExplicitWidth = 885
      ExplicitHeight = 662
      object Label7: TLabel
        Left = 24
        Top = 263
        Width = 58
        Height = 25
        Caption = 'Silver'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -21
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 24
        Top = 205
        Width = 45
        Height = 25
        Caption = 'Blue'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -21
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label5: TLabel
        Left = 24
        Top = 147
        Width = 62
        Height = 25
        Caption = 'Green'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -21
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label4: TLabel
        Left = 24
        Top = 89
        Width = 70
        Height = 25
        Caption = 'Yellow'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 4706810
        Font.Height = -21
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 24
        Top = 34
        Width = 44
        Height = 25
        Caption = 'RED'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -21
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object btnRedBlink: TButton
        Left = 209
        Top = 22
        Width = 80
        Height = 50
        Caption = 'ON/OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnWhiteOff: TButton
        Left = 305
        Top = 254
        Width = 80
        Height = 50
        Caption = 'OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnWhiteBlink: TButton
        Left = 209
        Top = 254
        Width = 80
        Height = 50
        Caption = 'ON/OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnWhiteOn: TButton
        Left = 113
        Top = 254
        Width = 80
        Height = 50
        Caption = 'ON'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnBlueOff: TButton
        Left = 305
        Top = 196
        Width = 80
        Height = 50
        Caption = 'OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnBlueBlink: TButton
        Left = 209
        Top = 196
        Width = 80
        Height = 50
        Caption = 'ON/OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnBlueOn: TButton
        Left = 113
        Top = 196
        Width = 80
        Height = 50
        Caption = 'ON'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnGreenOff: TButton
        Left = 305
        Top = 138
        Width = 80
        Height = 50
        Caption = 'OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 7
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnGreenBlink: TButton
        Left = 209
        Top = 138
        Width = 80
        Height = 50
        Caption = 'ON/OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 8
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnGreenOn: TButton
        Left = 113
        Top = 138
        Width = 80
        Height = 50
        Caption = 'ON'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 9
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnYellowOff: TButton
        Left = 305
        Top = 80
        Width = 80
        Height = 50
        Caption = 'OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 4706810
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 10
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnYellowBlink: TButton
        Left = 209
        Top = 80
        Width = 80
        Height = 50
        Caption = 'ON/OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 4706810
        Font.Height = -16
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 11
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnYellowOn: TButton
        Left = 113
        Top = 80
        Width = 80
        Height = 50
        Caption = 'ON'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = 4706810
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 12
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnRedOff: TButton
        Left = 305
        Top = 22
        Width = 80
        Height = 50
        Caption = 'OFF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 13
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
      object btnRedOn: TButton
        Left = 113
        Top = 22
        Width = 80
        Height = 50
        Caption = 'ON'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -24
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 14
        StyleElements = [seClient, seBorder]
        OnClick = btnLampClick
      end
    end
  end
  object GroupBox4: TGroupBox
    Left = 409
    Top = 65
    Width = 441
    Height = 647
    Align = alClient
    Caption = '[ Status ]'
    TabOrder = 2
    ExplicitLeft = 534
    ExplicitTop = 165
    ExplicitWidth = 516
    ExplicitHeight = 304
    object lbStatus: TListBox
      Left = 2
      Top = 16
      Width = 437
      Height = 629
      Align = alClient
      ItemHeight = 14
      TabOrder = 0
      ExplicitLeft = 16
      ExplicitTop = 24
      ExplicitWidth = 480
      ExplicitHeight = 50
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 850
    Height = 65
    Align = alTop
    BevelKind = bkFlat
    BevelOuter = bvNone
    TabOrder = 3
    ExplicitWidth = 1106
    DesignSize = (
      846
      61)
    object btnReset: TButton
      Left = 582
      Top = 9
      Width = 120
      Height = 41
      Anchors = [akTop, akRight]
      Caption = 'Status Clear'
      TabOrder = 0
      OnClick = btnResetClick
    end
    object btnExit: TButton
      Left = 716
      Top = 9
      Width = 120
      Height = 41
      Anchors = [akTop, akRight]
      Caption = 'EXIT'
      TabOrder = 1
      OnClick = btnExitClick
      ExplicitLeft = 972
    end
  end
  object rgModel: TRadioGroup
    Left = 431
    Top = 106
    Width = 120
    Height = 170
    Caption = 'Model Select'
    ItemIndex = 0
    Items.Strings = (
      'WS'
      'WP'
      'WM(1)'
      'WA(1)'
      'WB'
      'Buzz'
      'WM(8)'
      'WA(8)')
    TabOrder = 1
    Visible = False
  end
end