source: tags/1.2.0/Forms/UFormPlayer.lfm

object FormPlayer: TFormPlayer
  Left = 470
  Height = 344
  Top = 219
  Width = 522
  Caption = 'Player'
  ClientHeight = 344
  ClientWidth = 522
  Constraints.MinHeight = 344
  Constraints.MinWidth = 522
  OnShow = FormShow
  Position = poMainFormCenter
  LCLVersion = '1.6.4.0'
  object Label1: TLabel
    Left = 24
    Height = 24
    Top = 27
    Width = 56
    Caption = 'Name:'
    ParentColor = False
  end
  object EditName: TEdit
    Left = 168
    Height = 34
    Top = 27
    Width = 339
    Anchors = [akTop, akLeft, akRight]
    TabOrder = 0
  end
  object ButtonCancel: TButton
    Left = 278
    Height = 25
    Top = 307
    Width = 75
    Anchors = [akRight, akBottom]
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object ButtonOk: TButton
    Left = 403
    Height = 25
    Top = 307
    Width = 75
    Anchors = [akRight, akBottom]
    Caption = 'Ok'
    Default = True
    ModalResult = 1
    TabOrder = 2
  end
  object ComboBoxMode: TComboBox
    Left = 168
    Height = 34
    Top = 72
    Width = 339
    Anchors = [akTop, akLeft, akRight]
    ItemHeight = 0
    ItemIndex = 0
    Items.Strings = (
      'Human'
      'Computer'
    )
    OnChange = ComboBoxModeChange
    Style = csDropDownList
    TabOrder = 3
    Text = 'Human'
  end
  object Label2: TLabel
    Left = 24
    Height = 24
    Top = 72
    Width = 53
    Caption = 'Mode:'
    ParentColor = False
  end
  object Label3: TLabel
    Left = 24
    Height = 24
    Top = 128
    Width = 50
    Caption = 'Color:'
    ParentColor = False
  end
  object ColorBox1: TColorBox
    Left = 168
    Height = 38
    Top = 120
    Width = 339
    Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames]
    Anchors = [akTop, akLeft, akRight]
    ItemHeight = 20
    TabOrder = 4
  end
  object Label4: TLabel
    Left = 24
    Height = 24
    Top = 168
    Width = 98
    Caption = 'Agressivity:'
    ParentColor = False
  end
  object ComboBoxAgressivity: TComboBox
    Left = 168
    Height = 34
    Top = 168
    Width = 339
    Anchors = [akTop, akLeft, akRight]
    ItemHeight = 0
    Items.Strings = (
      'Low'
      'Medium'
      'High'
      ''
    )
    Style = csDropDownList
    TabOrder = 5
  end
  object CheckBoxDefensive: TCheckBox
    Left = 24
    Height = 28
    Top = 208
    Width = 107
    Caption = 'Defensive'
    TabOrder = 6
  end
  object Label5: TLabel
    Left = 24
    Height = 24
    Top = 248
    Width = 94
    Caption = 'Start units:'
    ParentColor = False
  end
  object SpinEditStartUnits: TSpinEdit
    Left = 224
    Height = 34
    Top = 240
    Width = 112
    MaxValue = 99
    TabOrder = 7
  end
end