object frmMain: TfrmMain
  AnchorSideBottom.Side = asrBottom
  Left = -10
  Height = 245
  Top = 1
  Width = 607
  Caption = 'ToolBox'
  ClientHeight = 245
  ClientWidth = 607
  DesignTimePPI = 144
  DragMode = dmAutomatic
  Menu = MainMenu1
  SessionProperties = 'Height;Width'
  LCLVersion = '1.8.4.0'
  Visible = True
  object PageControl1: TPageControl
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Side = asrBottom
    Left = 0
    Height = 248
    Top = 0
    Width = 607
    ActivePage = SeaVessel
    Anchors = [akTop, akLeft, akRight, akBottom]
    TabIndex = 4
    TabOrder = 0
    object AirGrpForm: TTabSheet
      Caption = 'AirGrpForm'
      ClientHeight = 215
      ClientWidth = 599
      OnShow = AGFbtnSrchEnter
      object AGFlbxGroup: TListBox
        AnchorSideBottom.Side = asrBottom
        Left = 0
        Height = 174
        Top = 40
        Width = 80
        Anchors = [akTop, akLeft, akBottom]
        BorderSpacing.Left = 1
        BorderSpacing.Top = 1
        BorderSpacing.Bottom = 1
        ExtendedSelect = False
        ItemHeight = 0
        OnSelectionChange = AGFlbxGroupSelectionChange
        PopupMenu = PopupMenuAGFgroup
        TabOrder = 1
      end
      object AGFlbxUnit: TListBox
        Left = 134
        Height = 163
        Top = 0
        Width = 464
        Anchors = [akTop, akLeft, akRight, akBottom]
        ExtendedSelect = False
        ItemHeight = 0
        OnSelectionChange = AGFlbxUnitSelectionChange
        ScrollWidth = 450
        TabOrder = 5
      end
      object AGFbtnGrp1: TButton
        AnchorSideLeft.Control = AGFlbxGroup
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = AGFlbxGroup
        Left = 82
        Height = 20
        Hint = 'Selected Group as Group1'
        Top = 40
        Width = 45
        BorderSpacing.Left = 2
        Caption = 'Grp1'
        OnClick = AGFbtnGrp1Enter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object AGFbtnGrp2: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFbtnGrp1
        AnchorSideTop.Side = asrBottom
        Left = 82
        Height = 20
        Hint = 'Selected Group as Group2'
        Top = 62
        Width = 45
        BorderSpacing.Top = 2
        Caption = 'Grp2'
        OnClick = AGFbtnGrp2Enter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
      end
      object AGFbtnMeet: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFbtnGrp2
        AnchorSideTop.Side = asrBottom
        Left = 82
        Height = 20
        Hint = 'Grp1 joins Grp2'
        Top = 84
        Width = 45
        BorderSpacing.Top = 2
        Caption = 'Join'
        OnClick = AGFbtnMeetEnter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
      end
      object AGFbtnASWPat: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFbtnCAPPat
        AnchorSideTop.Side = asrBottom
        AnchorSideBottom.Side = asrBottom
        Left = 82
        Height = 20
        Hint = 'vlow no radar'
        Top = 182
        Width = 45
        BorderSpacing.Top = 2
        Caption = 'ASW'
        OnClick = AGFbtnASWPatEnter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 16
      end
      object AGFspnbxPatrl: TSpinEdit
        AnchorSideLeft.Control = AGFlbxUnit
        AnchorSideTop.Control = AGFlbxUnit
        AnchorSideTop.Side = asrBottom
        Left = 134
        Height = 25
        Hint = 'Approx Patrol Diameter NM'
        Top = 166
        Width = 54
        AutoSelect = False
        AutoSize = False
        BorderSpacing.Top = 3
        Increment = 5
        MaxValue = 200
        ParentShowHint = False
        ShowHint = True
        TabOrder = 17
        Value = 30
      end
      object AGFspnbxUnitAlt: TSpinEdit
        AnchorSideRight.Control = AGFBtnSetAlt
        AnchorSideRight.Side = asrCenter
        AnchorSideBottom.Control = AGFSpnBxSplt
        AnchorSideBottom.Side = asrBottom
        Left = 468
        Height = 25
        Hint = 'Altitude Band'#13#10'11-vl ... 15vh'
        Top = 165
        Width = 50
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 15
        MaxValue = 15
        MinValue = 11
        OnExit = AGFspnbxUnitAltEditingDone
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        Value = 12
      end
      object AGFbtnSrch: TButton
        Left = 0
        Height = 22
        Hint = 'Reset Group list'
        Top = 8
        Width = 60
        Caption = 'Search'
        OnEnter = AGFbtnSrchEnter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object AGFbtnAEWPat: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFBtnEW
        AnchorSideTop.Side = asrBottom
        AnchorSideBottom.Control = AGFbtnCAPPat
        Left = 82
        Height = 26
        Hint = 'VHigh 1/10 radar'
        Top = 130
        Width = 45
        BorderSpacing.Top = 1
        BorderSpacing.Bottom = 3
        Caption = 'AEW'
        OnClick = AGFbtnAEWPatEnter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 14
      end
      object AGFBtnSplit: TButton
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Side = asrBottom
        Left = 525
        Height = 22
        Hint = 'split selected unit the set number of aircraft from group'
        Top = 192
        Width = 72
        Anchors = [akRight, akBottom]
        Caption = 'UnitSplit'
        OnClick = AGFBtnSplitClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 9
      end
      object AGFSpnBxSplt: TSpinEdit
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = AGFBtnSplit
        AnchorSideRight.Side = asrCenter
        AnchorSideBottom.Control = AGFBtnSplit
        Left = 531
        Height = 25
        Hint = 'Number of units to split off from group'
        Top = 165
        Width = 60
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 2
        BorderSpacing.Bottom = 2
        MaxValue = 99
        MinValue = 1
        ParentShowHint = False
        ShowHint = True
        TabOrder = 8
        Value = 1
      end
      object AGFBtnPause: TButton
        Left = 77
        Height = 22
        Top = 8
        Width = 50
        Caption = 'Pause'
        OnClick = AGFBtnPauseClick
        TabOrder = 10
        TabStop = False
      end
      object AGFbtnCAPPat: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFbtnAEWPat
        AnchorSideTop.Side = asrBottom
        AnchorSideBottom.Control = AGFbtnASWPat
        Left = 82
        Height = 20
        Hint = 'Med 1/5 Radar'
        Top = 159
        Width = 45
        BorderSpacing.Bottom = 3
        Caption = 'CAP'
        OnClick = AGFbtnCAPPatEnter
        ParentShowHint = False
        ShowHint = True
        TabOrder = 15
      end
      object AGFlblNOE: TLabel
        AnchorSideRight.Control = AGFBtnSetAlt
        AnchorSideBottom.Control = AGFspnbxUnitAlt
        AnchorSideBottom.Side = asrBottom
        Left = 401
        Height = 25
        Hint = 'NOE'
        Top = 165
        Width = 60
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 2
        Caption = '... ...'
        ParentColor = False
        ParentShowHint = False
        ShowHint = True
      end
      object AGFlblE: TLabel
        AnchorSideRight.Control = AGFspnbxLon
        AnchorSideRight.Side = asrCenter
        AnchorSideBottom.Control = AGFBtnSplit
        AnchorSideBottom.Side = asrCenter
        Left = 359
        Height = 22
        Hint = 'mouse click to toggle E/W offset'
        Top = 192
        Width = 30
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'E'
        ParentColor = False
        OnClick = AGFlblEClick
      end
      object AGFspnbxLon: TSpinEdit
        AnchorSideRight.Control = AGFlblNOE
        AnchorSideBottom.Control = AGFlblNOE
        AnchorSideBottom.Side = asrCenter
        Left = 349
        Height = 25
        Hint = 'set offset miles Long , unit to group centre'
        Top = 164
        Width = 50
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 2
        MaxValue = 15
        OnExit = AGFspnbxLonEditingDone
        TabStop = False
        TabOrder = 11
      end
      object AGFspnbxLat: TSpinEdit
        AnchorSideRight.Control = AGFspnbxLon
        AnchorSideBottom.Control = AGFspnbxLon
        AnchorSideBottom.Side = asrCenter
        Left = 297
        Height = 25
        Hint = 'set miles offset Lat, unit from group centre'
        Top = 163
        Width = 50
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 2
        MaxValue = 15
        OnExit = AGFspnbxLonEditingDone
        TabStop = False
        TabOrder = 12
      end
      object AGFlblS: TLabel
        AnchorSideRight.Control = AGFspnbxLat
        AnchorSideRight.Side = asrCenter
        AnchorSideBottom.Control = AGFlblE
        AnchorSideBottom.Side = asrCenter
        Left = 307
        Height = 22
        Hint = 'mouse click to toggle N/S offset'
        Top = 192
        Width = 30
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'N'
        ParentColor = False
        OnClick = AGFlblSClick
      end
      object AGFlblIFR: TLabel
        AnchorSideRight.Control = AGFlblNOE
        AnchorSideRight.Side = asrCenter
        AnchorSideBottom.Control = AGFBtnSplit
        AnchorSideBottom.Side = asrCenter
        Left = 401
        Height = 20
        Hint = 'Indicates if selected air unit is capable of receiving InFlight Refueling'
        Top = 193
        Width = 60
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'IFR'
        ParentColor = False
      end
      object AGFBtnEW: TButton
        AnchorSideLeft.Control = AGFbtnGrp1
        AnchorSideTop.Control = AGFbtnMeet
        AnchorSideTop.Side = asrBottom
        Left = 82
        Height = 20
        Hint = 'VHigh- 2.5/3 Radar'
        Top = 109
        Width = 45
        BorderSpacing.Top = 5
        Caption = 'EW'
        OnClick = AGFBtnEWClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 13
      end
      object AGFBtnSetAlt: TButton
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = AGFBtnSplit
        AnchorSideBottom.Control = AGFBtnSplit
        AnchorSideBottom.Side = asrCenter
        Left = 463
        Height = 22
        Hint = 'Press to set Unit Alt from above spin box'
        Top = 192
        Width = 60
        Anchors = [akRight, akBottom]
        BorderSpacing.Right = 2
        Caption = 'SetAlt'
        OnClick = AGFspnbxUnitAltEditingDone
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
      end
    end
    object Attack: TTabSheet
      Caption = 'Attack'
      ClientHeight = 210
      ClientWidth = 599
      OnShow = AtkBtnSrchEnter
      object AtkBtnSrch: TButton
        AnchorSideLeft.Control = AtkLbxFGroup
        Left = 0
        Height = 22
        Top = 4
        Width = 60
        Caption = 'Search'
        OnClick = AtkBtnSrchEnter
        TabOrder = 0
      end
      object AtkLbxFGroup: TListBox
        Left = 0
        Height = 179
        Top = 32
        Width = 80
        Anchors = [akTop, akLeft, akBottom]
        ItemHeight = 0
        OnSelectionChange = AtkLbxFGroupSelectionChange
        TabOrder = 1
      end
      object AtkLbxEGroup: TListBox
        AnchorSideLeft.Control = AtkLbxFUnit
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = AtkLbxFGroup
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Control = AtkLbxFGroup
        AnchorSideBottom.Side = asrBottom
        Left = 230
        Height = 179
        Top = 32
        Width = 96
        Anchors = [akTop, akLeft, akRight, akBottom]
        DragMode = dmAutomatic
        ItemHeight = 0
        OnSelectionChange = AtkLbxEGroupSelectionChange
        ScrollWidth = 120
        TabOrder = 3
      end
      object AtkLbxEUnit: TListBox
        AnchorSideLeft.Control = AtkLbxEGroup
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = AtkLbxFGroup
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Control = AtkLbxFGroup
        AnchorSideBottom.Side = asrBottom
        Left = 326
        Height = 179
        Top = 32
        Width = 196
        Anchors = [akTop, akLeft, akRight, akBottom]
        ExtendedSelect = False
        ItemHeight = 0
        OnSelectionChange = AtkLbxEUnitSelectionChange
        ScrollWidth = 300
        TabOrder = 4
      end
      object AtkBtnDefet: TButton
        AnchorSideLeft.Control = AtkBtnTarg
        AnchorSideTop.Control = AtkBtnCapt
        Left = 523
        Height = 22
        Top = 114
        Width = 75
        Anchors = [akTop, akRight]
        BorderSpacing.Top = 2
        Caption = 'Defect'
        OnClick = AtkBtnDefetClick
        TabOrder = 9
        TabStop = False
      end
      object AtkBtnCapt: TButton
        AnchorSideLeft.Control = AtkBtnTarg
        AnchorSideTop.Control = AtkBtnCover
        AnchorSideTop.Side = asrBottom
        Left = 523
        Height = 22
        Top = 112
        Width = 75
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 2
        Caption = 'Capture'
        OnClick = AtkBtnCaptClick
        TabOrder = 6
        TabStop = False
      end
      object AtkBtnCover: TButton
        AnchorSideLeft.Control = AtkBtnTarg
        AnchorSideTop.Control = AtkBtnTarg
        AnchorSideTop.Side = asrBottom
        Left = 523
        Height = 22
        Top = 88
        Width = 75
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 2
        Caption = 'Cover'
        OnClick = AtkBtnCoverClick
        TabOrder = 7
        TabStop = False
      end
      object AtkBtnTarg: TButton
        Left = 523
        Height = 22
        Top = 64
        Width = 75
        Anchors = [akTop, akRight]
        Caption = 'M-Targt'
        OnClick = AtkBtnTargClick
        TabOrder = 8
        TabStop = False
      end
      object AtkBtnPause: TButton
        AnchorSideLeft.Control = AtkLbxEGroup
        AnchorSideTop.Control = AtkBtnSrch
        AnchorSideTop.Side = asrCenter
        Left = 230
        Height = 22
        Top = 4
        Width = 60
        Caption = 'Pause'
        OnClick = AGFBtnPauseClick
        TabOrder = 5
      end
      object AtkLbxFUnit: TListBox
        AnchorSideLeft.Control = AtkLbxFGroup
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = AtkLbxFGroup
        AnchorSideBottom.Control = AtkLbxFGroup
        AnchorSideBottom.Side = asrBottom
        Left = 80
        Height = 179
        Top = 32
        Width = 150
        Anchors = [akTop, akLeft, akBottom]
        DragMode = dmAutomatic
        ItemHeight = 0
        OnSelectionChange = AtkLbxFUnitSelectionChange
        ScrollWidth = 200
        TabOrder = 2
      end
      object AtkLblBeta: TLabel
        Left = 522
        Height = 50
        Top = 4
        Width = 76
        Alignment = taCenter
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = 'Beta'#13#10'Functions'
        ParentColor = False
      end
      object AtkLblExact: TLabel
        AnchorSideLeft.Control = AtkLbxEUnit
        AnchorSideTop.Control = AtkLblBeta
        Left = 331
        Height = 22
        Top = 4
        Width = 95
        Alignment = taCenter
        AutoSize = False
        BorderSpacing.Left = 5
        BorderSpacing.Right = 2
        Caption = '* = exact fix'
        ParentColor = False
      end
      object AtkLblMG: TLabel
        AnchorSideLeft.Control = AtkLbxFUnit
        AnchorSideTop.Control = AtkBtnSrch
        Left = 80
        Height = 22
        Top = 4
        Width = 100
        AutoSize = False
        Caption = '** CanReTarget'
        Enabled = False
        ParentColor = False
      end
      object AtkBtnRepair: TButton
        AnchorSideLeft.Control = AtkBtnTarg
        AnchorSideTop.Control = AtkBtnCapt
        AnchorSideTop.Side = asrBottom
        Left = 523
        Height = 22
        Top = 136
        Width = 75
        BorderSpacing.Top = 2
        Caption = 'Repair'
        Enabled = False
        OnClick = AtkBtnRepairClick
        TabOrder = 10
      end
    end
    object MessgLog: TTabSheet
      Caption = 'MessageLog'
      ClientHeight = 215
      ClientWidth = 599
      OnShow = MessgLogMouseEnter
      object MLtmemLog: TMemo
        Left = 0
        Height = 212
        Top = 0
        Width = 590
        Anchors = [akTop, akLeft, akRight, akBottom]
        HideSelection = False
        Lines.Strings = (
          'Message Log'
        )
        ScrollBars = ssVertical
        TabOrder = 0
        TabStop = False
      end
    end
    object RefuelSheet: TTabSheet
      Caption = 'Aerial Refuel'
      ClientHeight = 215
      ClientWidth = 599
      OnShow = RefuelSheetShow
      ParentShowHint = False
      object RflLbxGroups: TListBox
        Left = 0
        Height = 191
        Top = 24
        Width = 104
        Anchors = [akTop, akLeft, akBottom]
        BidiMode = bdRightToLeft
        ExtendedSelect = False
        ItemHeight = 0
        OnSelectionChange = RflLbxGroupsSelectionChange
        ParentBidiMode = False
        ParentShowHint = False
        TabOrder = 0
      end
      object RflLbxDetail: TListBox
        Left = 312
        Height = 151
        Hint = 'In group window see either: '#13#10'all groups with a tanker (''Tank'' ticked)'#13#10'all groups currently in a refuel cycle (''Active'' ticked)'#13#10'or the group pulled up by auto pause.'#13#10'In Unit window see units of group IDing tankers'#13#10'for each unit see the current endurance, current range at current speed'#13#10'current range at unit normal cruise speed and nominal max range at normal cruise speed.'#13#10'use the last two to estimate how full is the unit.'#13#10'Unit window popup menu:'#13#10'select the name of the unit with mouse click, bring up menu with right mouse click,'#13#10'select menu item as required, if transfering fuel'#13#10'mouse click in ''Quantity'' spin box and mouse wheel to get '#13#10'desired amount.'#13#10' '
        Top = 1
        Width = 287
        Anchors = [akTop, akLeft, akRight, akBottom]
        ItemHeight = 0
        ParentShowHint = False
        ScrollWidth = 350
        ShowHint = True
        TabOrder = 2
      end
      object RflLbxUnits: TListBox
        Left = 104
        Height = 152
        Top = 0
        Width = 208
        Anchors = [akTop, akLeft, akBottom]
        ItemHeight = 0
        ParentShowHint = False
        PopupMenu = PopupMenuRFLUnit
        ScrollWidth = 250
        TabOrder = 1
      end
      object RflChkBPause: TCheckBox
        AnchorSideLeft.Control = RflChkBFind
        AnchorSideRight.Control = RflBtnPause
        AnchorSideBottom.Control = RflBtnPause
        AnchorSideBottom.Side = asrCenter
        Left = 190
        Height = 20
        Hint = 'AutoPause game when any refuel event occurs'
        Top = 162
        Width = 68
        Anchors = [akLeft, akBottom]
        AutoSize = False
        BorderSpacing.Right = 4
        Caption = 'AutoP'
        OnClick = RflChkBPauseClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
      end
      object RflChkBFind: TCheckBox
        AnchorSideLeft.Control = RflChkBPause
        AnchorSideRight.Control = RflChkBTnkGrpSrch
        AnchorSideBottom.Control = RflChkBTnkGrpSrch
        AnchorSideBottom.Side = asrBottom
        Left = 190
        Height = 20
        Hint = 'list air groups with current refuel events queued'
        Top = 187
        Width = 73
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 2
        Caption = 'Active'
        OnClick = RflChkBFindChange
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
      end
      object RflLblGameTime: TLabel
        AnchorSideRight.Control = RflLbxGroups
        AnchorSideRight.Side = asrBottom
        Left = 10
        Height = 22
        Hint = 'Game Time'
        Top = 4
        Width = 92
        Alignment = taRightJustify
        Anchors = [akTop, akRight]
        AutoSize = False
        BorderSpacing.Right = 2
        Caption = 'GameTime:'
        ParentColor = False
        ParentShowHint = False
        ShowHint = True
      end
      object RflBtnTrans: TButton
        AnchorSideRight.Side = asrBottom
        Left = 501
        Height = 25
        Hint = 'transfer internally or to any other tanker unit'#13#10'recipient = supply: internal from refuel'#13#10'recipient = -1 : internal to refuel'#13#10'recipient = other unit, refuel that unit'#13#10'  (Must be a tanker or IFR capable)'
        Top = 161
        Width = 95
        Anchors = [akRight, akBottom]
        BorderSpacing.Right = 1
        Caption = 'Tanker Transfr'
        OnClick = RflBtnTransClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        TabStop = False
      end
      object RflSpinEditTank: TSpinEdit
        AnchorSideRight.Control = RflSpinEditRecip
        AnchorSideBottom.Control = RflSpinEditRecip
        AnchorSideBottom.Side = asrCenter
        Left = 333
        Height = 25
        Hint = 'supply tanker unit No'
        Top = 160
        Width = 46
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 4
        MaxValue = 99
        ParentShowHint = False
        ShowHint = True
        TabStop = False
        TabOrder = 6
      end
      object RflChkBTnkGrpSrch: TCheckBox
        AnchorSideRight.Control = RflBtnPause
        AnchorSideRight.Side = asrCenter
        Left = 265
        Height = 20
        Hint = 'list air groups including tankers'
        Top = 187
        Width = 64
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'Tanks'
        Checked = True
        OnClick = RflBtnTnkrGrpSrchClick
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 7
      end
      object RflBtnQueue: TButton
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Side = asrBottom
        Left = 520
        Height = 22
        Hint = 'refuel cycle whole group'
        Top = 187
        Width = 60
        Anchors = [akRight, akBottom]
        Caption = 'Queue'
        OnClick = RflBtnQueueClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 8
        TabStop = False
      end
      object RflSpinEditQuant: TSpinEdit
        AnchorSideRight.Control = RflBtnTrans
        Left = 432
        Height = 25
        Hint = 'Quantity in nm to allocate for each tanker'#13#10'actual quantity might be reduced'
        Top = 161
        Width = 66
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 3
        Increment = 100
        MaxValue = 9999
        ParentShowHint = False
        ShowHint = True
        TabStop = False
        TabOrder = 9
      end
      object RflSpinEditRecip: TSpinEdit
        AnchorSideRight.Control = RflSpinEditQuant
        Left = 383
        Height = 25
        Hint = 'Recipient Unit No'#13#10'same as supply = topup main from refuel cell'#13#10'-1 = transfer from main to refuel cell'#13#10'other unit = refuel single unit'#13#10'specify quantity below'
        Top = 161
        Width = 46
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Right = 3
        MaxValue = 99
        MinValue = -1
        ParentShowHint = False
        ShowHint = True
        TabStop = False
        TabOrder = 10
      end
      object RflLblSupT: TLabel
        AnchorSideLeft.Control = RflSpinEditTank
        AnchorSideTop.Control = RflSpinEditTank
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = RflSpinEditTank
        AnchorSideRight.Side = asrCenter
        Left = 337
        Height = 22
        Top = 187
        Width = 37
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        BorderSpacing.Left = 2
        Caption = 'Supply'
        ParentColor = False
        ParentFont = False
        ParentShowHint = False
      end
      object RflLblRecipT: TLabel
        AnchorSideTop.Control = RflSpinEditRecip
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = RflSpinEditRecip
        AnchorSideRight.Side = asrCenter
        Left = 385
        Height = 22
        Top = 187
        Width = 42
        Alignment = taCenter
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'Receive'
        ParentColor = False
        ParentFont = False
        ParentShowHint = False
      end
      object RflBtnPause: TButton
        AnchorSideRight.Control = RflSpinEditTank
        AnchorSideBottom.Control = RflSpinEditTank
        AnchorSideBottom.Side = asrCenter
        Left = 271
        Height = 22
        Top = 161
        Width = 52
        Anchors = [akRight, akBottom]
        BorderSpacing.Right = 10
        Caption = 'Pause'
        OnClick = AGFBtnPauseClick
        TabOrder = 11
      end
      object RflLblAmnt: TLabel
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = RflSpinEditQuant
        AnchorSideRight.Side = asrCenter
        Left = 443
        Height = 22
        Top = 187
        Width = 44
        Anchors = [akRight, akBottom]
        AutoSize = False
        Caption = 'Amnt'
        ParentColor = False
        ParentShowHint = False
      end
      object RflChkBAutoPFinish: TCheckBox
        AnchorSideTop.Control = RflChkBPause
        AnchorSideRight.Control = RflChkBPause
        Left = 121
        Height = 24
        Hint = 'AutoPause when any group''s refuel cycle finishes'
        Top = 162
        Width = 67
        Anchors = [akTop, akRight]
        AutoSize = False
        BorderSpacing.Right = 2
        Caption = 'AP End'
        OnClick = RflChkBAutoPFinishClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 12
      end
    end
    object SeaVessel: TTabSheet
      Caption = 'Groups'
      ClientHeight = 210
      ClientWidth = 599
      OnShow = SeaVesselShow
      object SVListBoxUnits: TListBox
        AnchorSideLeft.Control = SVListBoxGroups
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = SVListBoxGroups
        Left = 102
        Height = 178
        Top = 30
        Width = 130
        Anchors = [akTop, akLeft, akBottom]
        ItemHeight = 0
        OnSelectionChange = SVListBoxUnitsSelectionChange
        ParentShowHint = False
        ScrollWidth = 180
        TabOrder = 2
      end
      object SVListBoxGroups: TListBox
        Left = 2
        Height = 178
        Top = 30
        Width = 100
        Anchors = [akTop, akLeft, akBottom]
        ItemHeight = 0
        OnSelectionChange = SVListBoxGroupsSelectionChange
        TabOrder = 1
      end
      object SVLabelUnits: TLabel
        AnchorSideTop.Control = SVbtnGrpUpdate
        AnchorSideRight.Control = SVListBoxUnits
        AnchorSideRight.Side = asrCenter
        Left = 142
        Height = 25
        Top = 0
        Width = 50
        Alignment = taCenter
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = 'Units'
        ParentColor = False
      end
      object SVListBoxUnitDetail: TListBox
        AnchorSideLeft.Control = SVListBoxUnits
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = SVListBoxUnits
        Left = 232
        Height = 178
        Top = 30
        Width = 363
        Anchors = [akTop, akLeft, akRight, akBottom]
        ExtendedSelect = False
        ItemHeight = 0
        ScrollWidth = 450
        TabOrder = 3
      end
      object SVLabelDetail: TLabel
        AnchorSideLeft.Control = SVListBoxUnitDetail
        AnchorSideLeft.Side = asrCenter
        AnchorSideTop.Control = SVbtnGrpUpdate
        AnchorSideRight.Side = asrCenter
        Left = 343
        Height = 25
        Top = 0
        Width = 140
        Alignment = taCenter
        AutoSize = False
        Caption = 'Unit Information'
        ParentColor = False
      end
      object SVbtnGrpUpdate: TButton
        Left = 24
        Height = 22
        Hint = 'Click To Update Group List'
        Top = 0
        Width = 58
        Caption = 'GROUP'
        OnClick = SVLabelGroupClick
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
    end
    object Settings: TTabSheet
      Caption = 'Settings'
      ClientHeight = 215
      ClientWidth = 599
      object SETlblMLcount: TLabel
        AnchorSideLeft.Control = SETspnMLC
        AnchorSideLeft.Side = asrCenter
        AnchorSideTop.Control = SETspnMLC
        AnchorSideTop.Side = asrBottom
        Left = 3
        Height = 50
        Top = 40
        Width = 105
        AutoSize = False
        BorderSpacing.Top = 2
        Caption = 'Message Log'#13#10'Line Count'
        ParentColor = False
      end
      object SETspnMLC: TSpinEdit
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Side = asrCenter
        Left = 18
        Height = 34
        Top = 4
        Width = 75
        AutoSelect = False
        AutoSize = False
        MaxValue = 1000
        MinValue = 25
        TabOrder = 0
        Value = 250
      end
      object SETmemHelp: TMemo
        Left = 120
        Height = 210
        Top = 4
        Width = 480
        Anchors = [akTop, akLeft, akRight, akBottom]
        Lines.Strings = (
          'Basic Help'
          'This toolbox utilises exportDLL functions of Beta Harpoon '
          'Classic game engines. You may need to download a '
          'current file from Harpgamer.com. The toolbox has some '
          'functions which are well developed and some which are '
          'developmental. There are limitations as to what '
          'information is available and therefor limits to simulation '
          'accuracy.'
          ''
          'The toolbox window can be sized so as to replace the '
          'normal message log window if you need extra space, then '
          'use the tool box message log.  Resize using the bottom '
          'right corner.'
          'When repostioning the window you might need to also resize it, '
          'do both of these with normal windows mouse operation.'
          ''
          'Throughout mosts of the toolbox windows if a player group is '
          'the selectied active group in the game then it will automatically '
          'be selected in the players group lists.'
          ''
          'Air Group Formation page: when clicked to bring into view, '
          'will automatically search for all your groups and list them '
          'with their current speeds in the left pane.'
          ' If a group is selected then any aircraft in that group will be '
          'listed in the larger right pane.'
          'If an air unit is selected then three functions are available: '
          'altitude band (alters altitude of that unit only), unit offset from'
          'group centre (in miles) N/S and E/W and unit split (splits'
          'that number of aircraft of that unit from the group). '
          'These items are changed by their respective spin box - set '
          'the desired number then press the return(enter) key to '
          'make the change. '
          'Also the NOE and IFR capability of the unit are shown.'
          'With an air group selected you can enter a hexagon based low alt'
          'patrol path by clicking the ''ASW'' button. '
          'First set the base size (approx nautical miles).  A hexagon based '
          'patrol will be set centred about the current postion or if the group '
          'has a course set, about its first course point, subsequent '
          'points (legs) will be discarded. '
          'The group will cruise at vlow altitude (or low) and loiter at '
          'each turn point to drop bouys if available. '
          'By this function an air group that has been sent to ''patrol'' '
          'using the ''launch'' function can be quickly set to perform a '
          '2-D patrol rather than loiter/hover in the one location or it '
          'can be sent to an area for an ASW sweep.'
          'A similar AEW patrol can be set cruise speed at high altitude'
          '(or highest alt allowed for that group) with 10 minute '
          'intermitent radar.'
          'An EW patrol will cruise at it''s highest available altitude and will '
          'run it''s radar (and hence EW emmisions) for 2 1/2 mins every 3.'
          'A CAP patrol can be set at medium altitude with 5 minute'
          'intermitent radar.'
          'If your air group is given a course of two or more legs, '
          '(orders are OK for the end point, eg RTB) and a patrol is set '
          'with zero pattern radius then the existing course is  maintained'
          ' and radar and loiter/cruise speeds are added so you can '
          'define your own custom patrol pattern.'
          'The selected group will be updated from the group selected'
          'in the game but the selection can be changed with a mouse click.'
          ''
          '"Join"'
          'Selected groups can be set one by one to the ''Grp1''and '
          '''Grp2'' variables (by pressing the respective buttons) then '
          'by pressing ''join'' key they will have their course set to meet '
          'at a mid point (time wise). When they meet at this point '
          'group1 will join group2, ie group 2 remains with the '
          'addition of the units of group1. '
          'If Group2 previously had a course then the combined '
          'group will proceed to its original leg one destination but '
          'any orders for that destsination are lost.  '
          'Note if group1 were at military or burner throttle then the '
          'resulting joined group will also. Group 1 shouldn''t be loitering '
          'when pressing the ''meet'' button. If Group 2 is loitering (eg '
          'tanker waiting to refuel) then Group 1 flys to Group 2.'
          'IMPORTANT: If either of the groups are currently attacking,'
          'then you need to firstly halt the attack by going into the course'
          'editer and "cancel" the course.'
          'When the groups join you will receive a staff message at '
          'which point you probably need to select the (new) group '
          'and then edit either/both speed and course including '
          'destination commands (eg land).'
          '"Split"'
          'A unit split button allows you to split off a selected number '
          'of planes of a single unit in an air group. The feature is '
          'similar to the in game split function but here you can see '
          'more information on the unit you are splitting so as to be '
          'more useful if you have a multi unit group all of the same '
          'platform but different loadouts.'
          ''
          'The Attack page:'
          ' has a number of functions that are generally of an '
          'indicitive nature of what might be possible with further '
          'development. '
          'The page lets you see information on visible enemy units, '
          'if the unit info line commences with "*" then it has exact fix. '
          'If an enemy (or neutral) unit is selected as the active in '
          'game unit then it will automatically be selected in toolbox '
          'attack page.'
          'You can launch an attempted "capture'' of an '
          'enemy group  using either air groups or surface groups. '
          'The calculations for this succeeding are based on enemy '
          'unit damage points and your surface group weapons .punch''.'
          'The distance to the enemy effects the outcome and is '
          'biased toward the enemy. If your attempt fails then the '
          'enemy has a chance of successfully mounting a counter '
          'attack and you loose your group to them.'
          'You can attemp to capture a neutral group, but if you fail '
          'you will make the target an enemy.'
          'The button ''cover'' will change your air groups path so that '
          'it goes to a point directly over the selected enemy unit, you '
          'need an exact fix on the enemy.'
          'You will also need to edit your groups course so that you '
          'get your desired action (eg attack) at that point. It is useful '
          'in precise anti sub attacks from helos.'
          'There is also a forced change of side button (Defect) which '
          'is mostly for testing but will toggle an enemy/neutral group''s'
          ' side. If you have one of your groups selected, but no enemy/'
          'neutral then the group will defect to a neutral (this is a handy'
          'way of effectively removing one of your groups from play.'
          ' '
          'The missile target button will sometimes allow you to re '
          'allocate your missiles target to a new target unit, you need '
          'to have a positive fix on the unit. Depending upon factors I '
          'haven''t quite worked out this function may do nothing.'
          'The friendly group and the enemy unit will be selected if '
          'they are selected in the game, they can be overridden with '
          'a mouse click'
          ''
          'Aerial Refuel Page:'
          'This gives information about refuel events that have been '
          'queued by the main program and also groups with tankers.'
          ''
          '"AutoPause'' when checked (click the check box) will stop '
          'processing and game play when ever a new refuel action is '
          'queued. You will see in the windows left to right :'
          '1/ the Group ID, 2/ the groups units with basic information '
          '3/ details of the event including (as appropriate) the '
          'current supply tanker and its remaining fuel supply for '
          'refuel, whether awaiting, completed or carrying out a '
          'refuel cycle, the per plane allocation for each unit.'
          ''
          '"Rfl Grps" when checked will pause the game and list in the '
          'left window the group ID and time for queued refuelling '
          'events. You can mouse click a group and the unit and '
          'detail information (as mentioned above) will appear for '
          'that group. '
          'You can sequentially look at as many of the events as you '
          'wish. When finished click "resume" to go back to game '
          'play.'
          '"Tnk Grps" will pause the game and list in the left window '
          'the groups which include tanker units (with or without refuel). '
          'By clicking one of the groups the unit information will '
          'come up in the centre window. '
          'In the unit info will be unit endurance times (in minutes) '
          'and for the tankers available refuel.'
          'If one of these is ticked when you enter the page the group'
          ' information will be automatically updated.'
          'Two refuelling control features are obtained from the '
          'buttons and spin box at the right lower portion of the page.'
          '"Queue" will start a refuel cycle for the selected group. '
          'You must select the supply tanker unit No in the left spin box,'
          'no other settings are needed. This is equivalent to a ''alt-r'' '
          'game command except you can select which tanker unit '
          'supplies fuel.'
          '"Transfer" allows you to transfer fuel between tanker units, '
          'to specific recipient units or to pump a tanker unit''s fuel  '
          'supply between main tanks and refuel cells. '
          'Specify the quantity of fuel to transfer in the lower spin box.'
          'Select the supply tanker and recipient tanker (unit Nos)'
          'in respective spin box.'
          'For internal transfer both recipient and supply tanker are'
          'set to the same number to transfer from the refuel cells '
          'to main tanks or recipient set to -1 to transfer to refuel '
          'cells from main tanks. This allows you to use available fuel'
          'for either refuel or tanker flight range as required.'
          'A right mouse click popup menu in the unit window lets you '
          'assign the Supply tanker, the Recipient unit or to transfer'
          'fuel from the tanker main tank to the refuel cells.'
          ''
          'Surface/Sub Page:'
          'This tab simply gives information about the units within '
          'groups.'
          ''
          'Settings Page'
          'Setting for the number of lines of Messages (in the Message page)'
          ' that are kept use top spin box.'
          ''
          'KBShortCuts'
          'A summary of the short cut keys including for functions '
          'not available through the ''F'' buttons'
        )
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 1
        WantReturns = False
      end
    end
    object Status: TTabSheet
      Caption = 'Status'
      ClientHeight = 215
      ClientWidth = 599
      object StatusPageControl: TPageControl
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Side = asrBottom
        Left = 0
        Height = 206
        Top = 8
        Width = 602
        ActivePage = StatVCTSht
        Anchors = [akTop, akLeft, akRight, akBottom]
        BorderSpacing.Left = 1
        BorderSpacing.Top = 2
        BorderSpacing.Right = 1
        BorderSpacing.Bottom = 1
        TabIndex = 0
        TabOrder = 0
        object StatVCTSht: TTabSheet
          Caption = 'VicConds'
          ClientHeight = 173
          ClientWidth = 594
          Enabled = False
          object StatVCLstbx: TListBox
            AnchorSideRight.Side = asrBottom
            AnchorSideBottom.Side = asrBottom
            Left = 0
            Height = 172
            Top = 0
            Width = 592
            Anchors = [akTop, akLeft, akRight, akBottom]
            BorderSpacing.Left = 1
            BorderSpacing.Top = 1
            BorderSpacing.Right = 1
            BorderSpacing.Bottom = 1
            ItemHeight = 0
            TabOrder = 0
          end
        end
        object StatSessTSht: TTabSheet
          Caption = 'Session'
          ClientHeight = 173
          ClientWidth = 594
          object StatSessLstBx: TListBox
            AnchorSideRight.Side = asrBottom
            AnchorSideBottom.Side = asrBottom
            Left = 0
            Height = 176
            Top = 0
            Width = 592
            Anchors = [akTop, akLeft, akRight, akBottom]
            ItemHeight = 0
            TabOrder = 0
          end
        end
        object StatDamTSht: TTabSheet
          Caption = 'Damaged'
          ClientHeight = 165
          ClientWidth = 578
          OnShow = StatDamTShtShow
          object StatDamLstBx: TListBox
            AnchorSideRight.Side = asrBottom
            AnchorSideBottom.Side = asrBottom
            Left = 3
            Height = 168
            Hint = 'Click to Update'
            Top = 0
            Width = 573
            Anchors = [akTop, akLeft, akRight, akBottom]
            Items.Strings = (
              'No Damaged units'
            )
            ItemHeight = 25
            OnClick = StatDamTShtShow
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
          end
        end
        object StatDeadTSht: TTabSheet
          Caption = 'DeadUnits'
          ClientHeight = 165
          ClientWidth = 578
          OnEnter = StatDeadTShtShow
          OnShow = StatDeadTShtShow
          object StatDeadLstBx: TListBox
            AnchorSideRight.Side = asrBottom
            AnchorSideBottom.Side = asrBottom
            Left = 0
            Height = 163
            Hint = 'click to update'
            Top = 0
            Width = 574
            Anchors = [akTop, akLeft, akRight, akBottom]
            Items.Strings = (
              'No Dead Units'
            )
            ItemHeight = 25
            OnClick = StatDeadTShtShow
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
          end
        end
      end
    end
    object KBShortCuts: TTabSheet
      Caption = 'KBShortCuts'
      ClientHeight = 215
      ClientWidth = 595
      object KbscText: TMemo
        Left = 0
        Height = 190
        Top = 0
        Width = 588
        Anchors = [akTop, akLeft, akRight, akBottom]
        Lines.Strings = (
          'Summary of Keboard Short Cut keys'
          ''
          'Tab:  toggle active between Group and Unit windows '
          'Alt+Tab move from toolbox focus to GE focus'
          'B: Bearing Only Missile Launch (not all missiles)'
          'Ctrl+F: dialog to calculate range & bearing from active group '
          'to another group'
          'C: Centres the windows around your currently selected group'
          ' or unit. '
          'U : Units – When a group is selected, selects the first unit of '
          'the group and centres and focus in unit window'
          '. (Period): Drop sonobuoy '
          'M: Free memory display '
          'F: Full in game report on the currently selected group or unit.'
          'I or Alt+I: Group and Unit ID display toggle for the map views. '
          'Alt+3, Alt +F3 Nuclear release status enabled in any scenario, '
          'regardless of the original setting in the scenario. '
          'Backspace Objects - Selects the next object to the north (up) in'
          ' the current window. '
          'Spacebar Objects - Selects the next object to the south (down)'
          ' in the current window. '
          'Alt+T: seeing course for friendly groups, toggle none, selected,'
          ' all. (in ‘AllSee’ works for all groups)'
          'Alt+R Refueling - Force Refueling if available'
          'Arrow keys Scroll the currently selected window, either the '
          'Group window or the Unit window. '
          'F10 or Ctrl+10 Staff Note Dialog for Entering Staff Notes '
          '(reminders for later)'
          '+ : Time Compression - Compresses time by one increment.'
          '-  : Time compression - De-compresses time by one increment.'
          'Enter or L: Time compression is set to 1:1. '
          'Z: Zooms in the current window (group or unit). '
          'X: Zooms out the current window (group or unit '
          'Ctrl+Alt+Z: Autoplay (machine plays itself) '
          'Ctrl+Alt+S: ‘See All’ see all units and groups irrespective of if '
          'detected by player'
        )
        TabOrder = 0
      end
    end
  end
  object IniPropStorage1: TIniPropStorage
    StoredValues = <    
      item
        Name = 'frmTop'
        Value = '0'
      end    
      item
        Name = 'frmLeft'
        Value = '0'
      end>
    IniFileName = 'ToolbosPosSz.ini'
    IniSection = 'SavePosSz'
    OnSavingProperties = IniPropStorage1SavingProperties
    left = 537
    top = 64
  end
  object PopupMenuAGFgroup: TPopupMenu
    left = 464
    top = 48
    object Grp1: TMenuItem
      Caption = 'Assign as Group1'
      OnClick = AGFbtnGrp1Enter
    end
    object Grp2: TMenuItem
      Caption = 'Assign as Group2'
      OnClick = AGFbtnGrp2Enter
    end
    object ASWpat: TMenuItem
      Caption = 'ASW Patrol'
      OnClick = AGFbtnASWPatEnter
    end
    object CAPpat: TMenuItem
      Caption = 'CAP Patrol'
      OnClick = AGFbtnCAPPatEnter
    end
    object AEWpat: TMenuItem
      Caption = 'AEW Patrol'
      OnClick = AGFbtnAEWPatEnter
    end
    object EWpat: TMenuItem
      Caption = 'EW Patrol'
      OnClick = AGFBtnEWClick
    end
  end
  object PopupMenuRFLUnit: TPopupMenu
    TrackButton = tbLeftButton
    left = 464
    top = 112
    object MenuItem1: TMenuItem
      Caption = 'Internal Main 2 IFR'
      OnClick = MenuItem1Click
    end
    object MenuItem2: TMenuItem
      Caption = 'Internal IFR 2 Main'
      OnClick = MenuItem2Click
    end
    object MenuItem3: TMenuItem
      Caption = 'Supply Tanker'
      OnClick = MenuItem3Click
    end
    object MenuItem4: TMenuItem
      Caption = 'Receiving Unit'
      OnClick = MenuItem4Click
    end
  end
  object MainMenu1: TMainMenu
    left = 488
    top = 14
  end
end