Unit1.lfm

object MainForm: TMainForm
  Left = 314
  Height = 425
  Top = 131
  Width = 590
  Caption = 'Soldat Admin 1.3'
  ClientHeight = 425
  ClientWidth = 590
  Color = clBtnFace
  Constraints.MinHeight = 425
  Constraints.MinWidth = 590
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '1.0.14.0'
  object ServerCommandLabel: TLabel
    Left = 0
    Height = 14
    Top = 388
    Width = 84
    Anchors = [akLeft, akBottom]
    Caption = 'Server command:'
    ParentColor = False
  end
  object ServerOutputMemo: TMemo
    Left = 0
    Height = 344
    Top = 45
    Width = 345
    Anchors = [akTop, akLeft, akBottom]
    Color = clBlack
    Font.Color = clLime
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object Cmd: TEdit
    Left = 0
    Height = 21
    Top = 402
    Width = 345
    Anchors = [akLeft, akBottom]
    Enabled = False
    OnKeyDown = CmdKeyDown
    OnKeyPress = CmdKeyPress
    TabOrder = 1
  end
  object GameGroup: TGroupBox
    Left = 352
    Height = 381
    Top = 43
    Width = 237
    Anchors = [akTop, akLeft, akRight, akBottom]
    Caption = 'Game:'
    ClientHeight = 363
    ClientWidth = 233
    TabOrder = 2
    object MapName: TLabel
      Left = 100
      Height = 14
      Top = 285
      Width = 25
      Anchors = [akLeft, akBottom]
      Caption = 'Map:'
      ParentColor = False
    end
    object Time: TLabel
      Left = 100
      Height = 14
      Top = 301
      Width = 24
      Anchors = [akLeft, akBottom]
      Caption = 'Time'
      ParentColor = False
    end
    object Limit: TLabel
      Left = 100
      Height = 14
      Top = 317
      Width = 56
      Anchors = [akLeft, akBottom]
      Caption = 'Score Limit:'
      ParentColor = False
    end
    object GameMode: TLabel
      Left = 100
      Height = 14
      Top = 333
      Width = 62
      Anchors = [akLeft, akBottom]
      Caption = 'Game Mode:'
      ParentColor = False
    end
    object PlayerList: TListView
      Left = 4
      Height = 233
      Top = 43
      Width = 225
      Anchors = [akTop, akLeft, akRight, akBottom]
      Columns = <      
        item
          Caption = 'Player Name'
          MinWidth = 125
          Width = 125
        end      
        item
          Caption = 'Score'
          MinWidth = 50
        end      
        item
          Caption = 'Deaths'
        end      
        item
          Caption = 'Ping'
          MinWidth = 50
        end      
        item
          Caption = 'Team'
          MinWidth = 40
          Width = 40
        end      
        item
          Caption = 'IP'
          MinWidth = 100
          Width = 100
        end      
        item
          Caption = 'Number'
          MinWidth = 50
        end>
      GridLines = True
      ReadOnly = True
      RowSelect = True
      TabOrder = 0
      ViewStyle = vsReport
      OnMouseDown = PlayerListMouseDown
    end
    object TeamScoresGroup: TGroupBox
      Left = 4
      Height = 82
      Top = 278
      Width = 89
      Anchors = [akLeft, akBottom]
      Caption = 'Team scores:'
      ClientHeight = 64
      ClientWidth = 85
      TabOrder = 1
      object Team1Label: TLabel
        Left = 6
        Height = 14
        Top = 1
        Width = 31
        Caption = 'Alpha:'
        ParentColor = False
      end
      object Team2Label: TLabel
        Left = 6
        Height = 14
        Top = 17
        Width = 32
        Caption = 'Bravo:'
        ParentColor = False
      end
      object Team3Label: TLabel
        Left = 6
        Height = 14
        Top = 33
        Width = 36
        Caption = 'Charlie:'
        ParentColor = False
      end
      object Team4Label: TLabel
        Left = 6
        Height = 14
        Top = 49
        Width = 29
        Caption = 'Delta:'
        ParentColor = False
      end
    end
    object Refresh: TButton
      Left = 4
      Height = 25
      Top = 0
      Width = 75
      Caption = 'Refresh'
      Enabled = False
      OnClick = RefreshClick
      TabOrder = 2
    end
    object AutoRefreshCheckBox: TCheckBox
      Left = 4
      Height = 17
      Top = 26
      Width = 106
      Caption = 'Auto (every 5 sec)'
      TabOrder = 3
    end
    object Shutdown: TButton
      Left = 154
      Height = 25
      Top = 0
      Width = 75
      Caption = 'Shutdown'
      Enabled = False
      OnClick = ShutdownClick
      TabOrder = 4
    end
  end
  object RemoteServerGroup: TGroupBox
    Left = 0
    Height = 45
    Top = -1
    Width = 589
    Anchors = [akTop, akLeft, akRight]
    Caption = 'Remote Server:'
    ClientHeight = 27
    ClientWidth = 585
    TabOrder = 3
    object IpLabel: TLabel
      Left = 5
      Height = 14
      Top = 6
      Width = 14
      Caption = 'IP:'
      ParentColor = False
    end
    object PortLabel: TLabel
      Left = 134
      Height = 14
      Top = 6
      Width = 23
      Caption = 'Port:'
      ParentColor = False
    end
    object PasswordLabel: TLabel
      Left = 208
      Height = 14
      Top = 6
      Width = 50
      Caption = 'Password:'
      ParentColor = False
    end
    object Host: TEdit
      Left = 22
      Height = 21
      Top = 2
      Width = 105
      OnChange = ServerCredentialsEditChange
      OnKeyPress = ServerCredentialsEditKeyPress
      TabOrder = 0
      Text = '127.0.0.1'
    end
    object Port: TEdit
      Left = 159
      Height = 21
      Top = 2
      Width = 41
      OnChange = ServerCredentialsEditChange
      OnKeyPress = ServerCredentialsEditKeyPress
      TabOrder = 1
      Text = '23073'
    end
    object Pass: TEdit
      Left = 261
      Height = 21
      Top = 2
      Width = 81
      EchoMode = emPassword
      OnChange = ServerCredentialsEditChange
      OnKeyPress = ServerCredentialsEditKeyPress
      PasswordChar = '*'
      TabOrder = 2
    end
    object Connect: TButton
      Left = 356
      Height = 27
      Top = -3
      Width = 97
      Caption = 'Connect'
      OnClick = ConnectClick
      TabOrder = 3
    end
  end
  object Timer: TTimer
    Interval = 500
    OnTimer = TimerTimer
    left = 16
    top = 60
  end
  object PlayerPopup: TPopupMenu
    AutoPopup = False
    left = 544
    top = 280
    object KickMenuItem: TMenuItem
      Caption = 'Kick'
      OnClick = KickMenuItemClick
    end
    object BanMenuItem: TMenuItem
      Caption = 'Ban'
      OnClick = BanMenuItemClick
    end
    object AdminMenuItem: TMenuItem
      Caption = 'Admin'
      OnClick = AdminMenuItemClick
    end
  end
  object RefreshTimer: TTimer
    Interval = 5000
    OnTimer = RefreshTimerTimer
    left = 48
    top = 60
  end
end