object frmMain: TfrmMain AnchorSideBottom.Side = asrBottom Left = -10 Height = 238 Top = 1 Width = 631 Caption = 'ToolBox' ClientHeight = 238 ClientWidth = 631 DesignTimePPI = 144 DragMode = dmAutomatic FormStyle = fsStayOnTop OnChangeBounds = FormChangeBounds SessionProperties = 'Height;SETspnMLC.Value;Width;Top;Left;SetCkBxIter.Checked' LCLVersion = '1.8.4.0' Visible = True object PageControl1: TPageControl AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 241 Top = 0 Width = 631 ActivePage = MessgLog Anchors = [akTop, akLeft, akRight, akBottom] TabIndex = 2 TabOrder = 0 object AirGrpForm: TTabSheet Caption = 'AirGrpForm' ClientHeight = 211 ClientWidth = 626 OnShow = AGFbtnSrchEnter object AGFlbxGroup: TListBox AnchorSideBottom.Side = asrBottom Left = 0 Height = 170 Top = 40 Width = 80 Anchors = [akTop, akLeft, akBottom] BorderSpacing.Left = 1 BorderSpacing.Top = 1 BorderSpacing.Bottom = 1 ExtendedSelect = False ItemHeight = 0 OnDblClick = AGFlbxGroupDblClick OnSelectionChange = AGFlbxGroupSelectionChange PopupMenu = PopupMenuAGFgroup TabOrder = 1 end object AGFlbxUnit: TListBox Left = 134 Height = 159 Top = 0 Width = 491 Anchors = [akTop, akLeft, akRight, akBottom] ExtendedSelect = False ItemHeight = 0 OnDblClick = AGFlbxUnitDblClick 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 = 162 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 = 495 Height = 25 Hint = 'Altitude Band'#13#10'11-vl ... 15vh' Top = 161 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 = 552 Height = 22 Hint = 'split selected unit the set number of aircraft from group' Top = 188 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 = 558 Height = 25 Hint = 'Number of units to split off from group' Top = 161 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 Hint = 'Press to Pause/Resume' Top = 8 Width = 50 Caption = 'Pause' OnClick = AGFBtnPauseClick ParentShowHint = False ShowHint = True 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 = 428 Height = 25 Hint = 'NOE' Top = 161 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 = 386 Height = 22 Hint = 'mouse click to toggle E/W offset' Top = 188 Width = 30 Alignment = taCenter Anchors = [akRight, akBottom] AutoSize = False Caption = 'E' ParentColor = False ParentShowHint = False ShowHint = True OnClick = AGFlblEClick end object AGFspnbxLon: TSpinEdit AnchorSideRight.Control = AGFlblNOE AnchorSideBottom.Control = AGFlblNOE AnchorSideBottom.Side = asrCenter Left = 376 Height = 25 Hint = 'offset unit Long nm'#13#10'from group centre' Top = 160 Width = 50 Anchors = [akRight, akBottom] AutoSize = False BorderSpacing.Right = 2 MaxValue = 15 OnExit = AGFspnbxLonEditingDone ParentShowHint = False ShowHint = True TabStop = False TabOrder = 11 end object AGFspnbxLat: TSpinEdit AnchorSideRight.Control = AGFspnbxLon AnchorSideBottom.Control = AGFspnbxLon AnchorSideBottom.Side = asrCenter Left = 324 Height = 25 Hint = 'offset unit Lat nm'#13#10'from group centre' Top = 159 Width = 50 Anchors = [akRight, akBottom] AutoSize = False BorderSpacing.Right = 2 MaxValue = 15 OnExit = AGFspnbxLonEditingDone ParentShowHint = False ShowHint = True TabStop = False TabOrder = 12 end object AGFlblS: TLabel AnchorSideRight.Control = AGFspnbxLat AnchorSideRight.Side = asrCenter AnchorSideBottom.Control = AGFlblE AnchorSideBottom.Side = asrCenter Left = 334 Height = 22 Hint = 'mouse click to toggle N/S offset' Top = 188 Width = 30 Alignment = taCenter Anchors = [akRight, akBottom] AutoSize = False Caption = 'N' ParentColor = False ParentShowHint = False ShowHint = True OnClick = AGFlblSClick end object AGFlblIFR: TLabel AnchorSideRight.Control = AGFlblNOE AnchorSideRight.Side = asrCenter AnchorSideBottom.Control = AGFBtnSplit AnchorSideBottom.Side = asrCenter Left = 428 Height = 20 Hint = 'Indicates if selected air unit is capable of receiving InFlight Refueling' Top = 189 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 = 490 Height = 22 Hint = 'Press to set Unit Alt from above spin box' Top = 188 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 = 277 ClientWidth = 737 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 = 246 Top = 32 Width = 88 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 OnDblClick = AtkLbxFGroupDblClick OnSelectionChange = AtkLbxFGroupSelectionChange TabOrder = 1 end object AtkLbxEGroup: TListBox AnchorSideLeft.Control = AtkLbxFUnit AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = AtkLbxFGroup AnchorSideRight.Control = AtkLbxEUnit AnchorSideBottom.Control = AtkLbxFGroup AnchorSideBottom.Side = asrBottom Left = 248 Height = 246 Top = 32 Width = 85 Anchors = [akTop, akLeft, akRight, akBottom] DragMode = dmAutomatic ItemHeight = 0 OnSelectionChange = AtkLbxEGroupSelectionChange TabOrder = 3 end object AtkLbxEUnit: TListBox AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = AtkLbxFGroup AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = AtkLbxFGroup AnchorSideBottom.Side = asrBottom Left = 333 Height = 246 Top = 32 Width = 324 Anchors = [akTop, akLeft, akRight, akBottom] ExtendedSelect = False ItemHeight = 0 OnDblClick = AtkLbxEUnitDblClick OnSelectionChange = AtkLbxEUnitSelectionChange ScrollWidth = 450 TabOrder = 4 end object AtkBtnDefet: TButton Left = 661 Height = 22 Top = 160 Width = 75 Anchors = [akTop, akRight] Caption = 'Defect' OnClick = AtkBtnDefetClick TabOrder = 9 TabStop = False end object AtkBtnCapt: TButton Left = 661 Height = 22 Top = 128 Width = 75 Anchors = [akTop, akRight] Caption = 'Capture' OnClick = AtkBtnCaptClick TabOrder = 6 TabStop = False end object AtkBtnCover: TButton Left = 661 Height = 22 Top = 96 Width = 75 Anchors = [akTop, akRight] Caption = 'Cover' OnClick = AtkBtnCoverClick TabOrder = 7 TabStop = False end object AtkBtnTarg: TButton Left = 661 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 AnchorSideRight.Side = asrBottom Left = 248 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 = 88 Height = 246 Hint = 'NS=hydrodynamic noise signature' Top = 32 Width = 160 Anchors = [akTop, akLeft, akBottom] DragMode = dmAutomatic ItemHeight = 0 OnSelectionChange = AtkLbxFUnitSelectionChange ParentShowHint = False ScrollWidth = 200 ShowHint = True TabOrder = 2 end object AtkLblBeta: TLabel Left = 660 Height = 50 Top = 4 Width = 76 Alignment = taCenter Anchors = [akTop, akRight] AutoSize = False Caption = 'Beta'#13#10'Functions' ParentColor = False Visible = False end object AtkLblExact: TLabel AnchorSideLeft.Control = AtkLbxEUnit AnchorSideTop.Control = AtkLblBeta Left = 338 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 = 88 Height = 22 Top = 4 Width = 100 AutoSize = False Caption = '** CanReTarget' ParentColor = False end object AtkBtnSrchE: TButton AnchorSideTop.Control = AtkBtnSrch AnchorSideRight.Control = AtkLbxEUnit AnchorSideRight.Side = asrBottom Left = 597 Height = 22 Hint = 'Search and reset Enemy/Neutral groups' Top = 4 Width = 60 Anchors = [akTop, akRight] Caption = 'UpdateE' OnClick = AtkBtnSrchEClick ParentShowHint = False ShowHint = True TabOrder = 10 end object AtkBtnAtkWarn: TCheckBox AnchorSideLeft.Control = AtkBtnDefet AnchorSideTop.Control = AtkBtnDefet AnchorSideTop.Side = asrBottom Left = 661 Height = 24 Top = 184 Width = 96 AutoSize = False BorderSpacing.Top = 2 Caption = 'AtkWarn' TabOrder = 11 TabStop = False end end object MessgLog: TTabSheet Caption = 'MessageLog' ClientHeight = 203 ClientWidth = 623 OnShow = MessgLogMouseEnter object MLtmemLog: TMemo AnchorSideLeft.Control = MLGroupInfo AnchorSideLeft.Side = asrBottom Left = 170 Height = 200 Top = 0 Width = 444 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 2 HideSelection = False Lines.Strings = ( 'Message Log' ) ScrollBars = ssVertical TabOrder = 0 TabStop = False end object MLGroupInfo: TListBox Left = 6 Height = 100 Top = 0 Width = 162 ItemHeight = 0 TabOrder = 1 end object MLUnitInfo: TListBox AnchorSideLeft.Control = MLGroupInfo AnchorSideTop.Control = MLGroupInfo AnchorSideTop.Side = asrBottom AnchorSideRight.Control = MLGroupInfo AnchorSideRight.Side = asrBottom Left = 6 Height = 100 Top = 101 Width = 162 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 1 ItemHeight = 0 TabOrder = 2 end end object RefuelSheet: TTabSheet Caption = 'Aerial Refuel' ClientHeight = 277 ClientWidth = 737 OnShow = RefuelSheetShow ParentShowHint = False object RflLbxGroups: TListBox Left = 0 Height = 220 Top = 24 Width = 104 Anchors = [akTop, akLeft, akBottom] BidiMode = bdRightToLeft ExtendedSelect = False ItemHeight = 0 OnDblClick = RflLbxGroupsDblClick OnSelectionChange = RflLbxGroupsSelectionChange ParentBidiMode = False ParentShowHint = False TabOrder = 0 end object RflLbxDetail: TListBox Left = 312 Height = 213 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 = 425 Anchors = [akTop, akLeft, akRight, akBottom] ItemHeight = 0 ParentShowHint = False ScrollWidth = 350 ShowHint = True TabOrder = 2 end object RflLbxUnits: TListBox Left = 104 Height = 214 Top = 0 Width = 208 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 ParentShowHint = False PopupMenu = PopupMenuRFLUnit ScrollWidth = 250 TabOrder = 1 end object RflChkBPause: TCheckBox AnchorSideLeft.Control = RflLbxUnits AnchorSideTop.Control = RflLbxUnits AnchorSideTop.Side = asrBottom AnchorSideBottom.Control = RflBtnPause AnchorSideBottom.Side = asrCenter Left = 104 Height = 20 Hint = 'AutoPause game when any refuel event occurs' Top = 216 Width = 75 AutoSize = False BorderSpacing.Top = 2 BorderSpacing.Right = 4 Caption = 'AutoP' OnClick = RflChkBPauseClick ParentShowHint = False ShowHint = True TabOrder = 3 TabStop = False end object RflChkBFind: TCheckBox AnchorSideLeft.Control = RflChkBPause AnchorSideBottom.Control = RflChkBTnkGrpSrch AnchorSideBottom.Side = asrBottom Left = 104 Height = 20 Hint = 'list air groups with current refuel events queued' Top = 249 Width = 73 Anchors = [akLeft, 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 = 639 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 = 223 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 = 471 Height = 25 Hint = 'supply tanker unit No' Top = 222 Width = 46 Anchors = [akRight, akBottom] AutoSize = False BorderSpacing.Right = 4 MaxValue = 99 ParentShowHint = False ShowHint = True TabStop = False TabOrder = 6 end object RflChkBTnkGrpSrch: TCheckBox AnchorSideLeft.Control = RflChkBFind AnchorSideLeft.Side = asrBottom AnchorSideRight.Control = RflBtnPause AnchorSideRight.Side = asrCenter Left = 179 Height = 20 Hint = 'list air groups including tankers' Top = 249 Width = 72 Anchors = [akLeft, akBottom] AutoSize = False BorderSpacing.Left = 2 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 = 658 Height = 22 Hint = 'refuel cycle whole group' Top = 249 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 = 570 Height = 25 Hint = 'Quantity in nm to allocate for each tanker'#13#10'actual quantity might be reduced' Top = 223 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 = 521 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 = 223 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 = 475 Height = 22 Top = 249 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 = 523 Height = 22 Top = 249 Width = 42 Alignment = taCenter Anchors = [akRight, akBottom] AutoSize = False Caption = 'Receive' ParentColor = False ParentFont = False ParentShowHint = False end object RflBtnPause: TButton AnchorSideLeft.Control = RflChkBPause AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = RflChkBPause AnchorSideTop.Side = asrCenter AnchorSideBottom.Side = asrCenter Left = 183 Height = 20 Top = 216 Width = 52 BorderSpacing.Left = 2 BorderSpacing.Right = 10 Caption = 'Pause' OnClick = AGFBtnPauseClick TabOrder = 11 end object RflLblAmnt: TLabel AnchorSideTop.Side = asrBottom AnchorSideRight.Control = RflSpinEditQuant AnchorSideRight.Side = asrCenter Left = 581 Height = 22 Top = 249 Width = 44 Anchors = [akRight, akBottom] AutoSize = False Caption = 'Amnt' ParentColor = False ParentShowHint = False end object RflChkBAutoPFinish: TCheckBox AnchorSideLeft.Control = RflLbxGroups AnchorSideTop.Control = RflLbxGroups AnchorSideTop.Side = asrBottom Left = 0 Height = 29 Hint = 'AutoPause when any group''s refuel cycle finishes' Top = 246 Width = 87 BorderSpacing.Top = 2 Caption = 'AP End' OnClick = RflChkBAutoPFinishClick ParentShowHint = False ShowHint = True TabOrder = 12 end end object SeaVessel: TTabSheet Caption = 'Groups' ClientHeight = 277 ClientWidth = 737 OnShow = SeaVesselShow object SVListBoxUnits: TListBox AnchorSideLeft.Control = SVListBoxGroups AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = SVListBoxGroups Left = 102 Height = 245 Top = 30 Width = 130 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 OnDblClick = SVListBoxUnitsDblClick OnSelectionChange = SVListBoxUnitsSelectionChange ParentShowHint = False ScrollWidth = 180 TabOrder = 2 end object SVListBoxGroups: TListBox Left = 2 Height = 245 Top = 30 Width = 100 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 OnDblClick = SVListBoxGroupsDblClick 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 = 245 Top = 30 Width = 501 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 = 412 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 Munitions: TTabSheet Caption = 'munitions' ClientHeight = 277 ClientWidth = 737 object MunGenTmen: TMemo AnchorSideRight.Side = asrCenter AnchorSideBottom.Side = asrBottom Left = 0 Height = 247 Top = 24 Width = 432 Anchors = [akTop, akLeft, akRight, akBottom] Lines.Strings = ( 'MunGenTmen' ) TabOrder = 0 end object MunACTmen: TMemo AnchorSideLeft.Control = MunGenTmen AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = MunGenTmen AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 434 Height = 247 Top = 24 Width = 304 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 2 Lines.Strings = ( 'MunACTmen' ) TabOrder = 1 end end object Settings: TTabSheet Caption = 'Settings' ClientHeight = 277 ClientWidth = 737 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 = 999 MinValue = 30 TabOrder = 0 Value = 50 end object SETmemHelp: TMemo Left = 120 Height = 272 Top = 4 Width = 618 Anchors = [akTop, akLeft, akRight, akBottom] Lines.Strings = ( 'Basic Help' 'This toolbox utilises exportDLL functions of Harpoon ' 'Classic game engines. You may need to download a ' 'current file from Harpgamer.com. ' '' '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.' '' '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. If Group 1 is loitering then ' 'it will be set to cruise at it''s current alt. 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.' 'The page lets you see information on visible enemy units, ' 'if the unit info line commences with "*" then it has exact fix. ' 'If the group is listed ''00'' it is of unknown side, ''001'' is unknown ' 'side and selected group or unit. ' '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 defensice weapons 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 if you ' 'have an exact fix or mid point of an inexact fix. You will get ' 'an assitant message when you arrive then you will 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 allow you to re target your missile' 'if it is midcourse guidance capable and in midcourse guidance phase' 'You need to have a positive fix on the new target unit. ' '' '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. Enemy/neutral units might not be auto selected' 'if you don''t know their side or have an exact fix.' '' '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.' '' 'Group 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. Max lines 999.' '(No Longer Used - Includes a spin box to set the value for the top of the window at ' 'the start of each game, you might need to experiment with this to ' 'get the postion you want. )' 'You can alter the postion and size of the toolbox window in the ' 'usual way with your mouse. ' 'Toolbox will remember tthese settings one session to the next.' '' '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 object SetSpinEditTop: TSpinEdit AnchorSideLeft.Control = SETspnMLC AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = SETlblMLcount AnchorSideTop.Side = asrBottom Left = 18 Height = 33 Hint = 'adjust and click Set Top lbl below to move' Top = 95 Width = 75 AutoSize = False BorderSpacing.Top = 5 Enabled = False MaxValue = 800 OnClick = FormChangeBounds TabStop = False TabOrder = 2 end object SetLblTop: TLabel AnchorSideLeft.Control = SETspnMLC AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = SetSpinEditTop AnchorSideTop.Side = asrBottom Left = 26 Height = 25 Hint = 'click here to position' Top = 131 Width = 59 BorderSpacing.Top = 3 Caption = 'Set Top' Enabled = False ParentColor = False ParentShowHint = False ShowHint = True OnClick = SetLblTopClick end object SetCkBxIter: TCheckBox AnchorSideLeft.Control = SetSpinEditTop AnchorSideTop.Control = SetLblTop AnchorSideTop.Side = asrBottom Left = 18 Height = 29 Top = 158 Width = 93 BorderSpacing.Top = 2 Caption = 'IterSave' TabOrder = 3 end end object Status: TTabSheet Caption = 'Status' ClientHeight = 277 ClientWidth = 737 object StatusPageControl: TPageControl AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 268 Top = 8 Width = 740 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 = 230 ClientWidth = 732 object StatVCLstbx: TListBox AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 229 Top = 0 Width = 730 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 = 230 ClientWidth = 732 object StatSessLstBx: TListBox AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 233 Top = 0 Width = 730 Anchors = [akTop, akLeft, akRight, akBottom] ItemHeight = 0 TabOrder = 0 end end object StatDamTSht: TTabSheet Caption = 'Damaged' ClientHeight = 164 ClientWidth = 588 OnShow = StatDamTShtShow object StatDamLstBx: TListBox AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 3 Height = 167 Hint = 'Click to Update' Top = 0 Width = 583 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 = 164 ClientWidth = 588 OnEnter = StatDeadTShtShow OnShow = StatDeadTShtShow object StatDeadLstBx: TListBox AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 162 Hint = 'click to update' Top = 0 Width = 584 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 = 211 ClientWidth = 593 object KbscText: TMemo Left = 0 Height = 186 Top = 0 Width = 586 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' ) ScrollBars = ssAutoVertical TabOrder = 0 end end end object IniPropStorage1: TIniPropStorage StoredValues = < item Name = 'frmTop' 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 PopupMenu1: TPopupMenu left = 528 top = 144 end end