object frmMain: TfrmMain
  Left = 276
  Height = 451
  Top = 166
  Width = 805
  Caption = 'lazGUI'
  ClientHeight = 451
  ClientWidth = 805
  OnChangeBounds = FormChangeBounds
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnWindowStateChange = FormWindowStateChange
  Position = poDefaultSizeOnly
  LCLVersion = '3.6.0.0'
  object PageControl1: TPageControl
    Left = 0
    Height = 451
    Top = 0
    Width = 805
    ActivePage = tshDLLInit
    Anchors = [akTop, akLeft, akRight, akBottom]
    MultiLine = True
    TabIndex = 0
    TabOrder = 0
    Options = [nboMultiLine]
    object tshDLLInit: TTabSheet
      Caption = 'DLLInit'
      ClientHeight = 363
      ClientWidth = 797
      object memDLLInit: TMemo
        Left = 0
        Height = 352
        Top = 8
        Width = 792
        Anchors = [akTop, akLeft, akRight, akBottom]
        ScrollBars = ssAutoBoth
        TabOrder = 0
      end
    end
    object tshUnitLatLon: TTabSheet
      Caption = 'UnitLatLon'
      ClientHeight = 363
      ClientWidth = 797
      object ULLlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object ULLedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 0
        Value = 1024
      end
      object ULLmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 1
        WordWrap = False
      end
      object ULLckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 2
      end
    end
    object tshUnitShowing: TTabSheet
      Caption = 'UnitShowing'
      ClientHeight = 363
      ClientWidth = 797
      object USckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object USlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object USedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object USmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitURegion: TTabSheet
      Caption = 'UnitURegion'
      ClientHeight = 363
      ClientWidth = 797
      object UURckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object UURlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UURedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object UURmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitCourse: TTabSheet
      Caption = 'UnitCourse'
      ClientHeight = 363
      ClientWidth = 797
      object UCckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object UClblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UCedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object UCmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitSpeed: TTabSheet
      Caption = 'UnitSpeed'
      ClientHeight = 363
      ClientWidth = 797
      object USPckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object USPlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object USPedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object USPmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitAlt: TTabSheet
      Caption = 'UnitAlt'
      ClientHeight = 363
      ClientWidth = 797
      object UAckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object UAlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UAedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object UAmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitShowingSide: TTabSheet
      Caption = 'UnitShowingSide'
      ClientHeight = 363
      ClientWidth = 797
      object USSckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object USSlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object USSedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object USSmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitSink: TTabSheet
      Caption = 'UnitSink'
      ClientHeight = 363
      ClientWidth = 797
      object USKckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object USKlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object USKedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object USKmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshTimeFactor: TTabSheet
      Caption = 'TimeFactor'
      ClientHeight = 363
      ClientWidth = 797
      object TFckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object TFlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object TFedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object TFmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitToGroup: TTabSheet
      Caption = 'UnitToGroup'
      ClientHeight = 363
      ClientWidth = 797
      object UGedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 0
        Value = 1024
      end
      object UGlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UGckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 1
      end
      object UGmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitNew: TTabSheet
      Caption = 'UnitNew'
      ClientHeight = 363
      ClientWidth = 797
      object UNedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 0
        Value = 1024
      end
      object UNlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UNckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 1
      end
      object UNmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshUnitFree: TTabSheet
      Caption = 'UnitFree'
      ClientHeight = 363
      ClientWidth = 797
      object UFckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object UFlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object UFedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object UFmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshGroupAllocated: TTabSheet
      Caption = 'GroupAllocated'
      ClientHeight = 363
      ClientWidth = 797
      object GAckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object GAlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object GAedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object GAmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshGroupFree: TTabSheet
      Caption = 'GroupFree'
      ClientHeight = 363
      ClientWidth = 797
      object GFckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
        OnChange = GFckbEnabledChange
      end
      object GFlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object GFedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object GFmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshMsgLog: TTabSheet
      Caption = 'MsgLog'
      ClientHeight = 363
      ClientWidth = 797
      object MLmemMsgLog: TMemo
        Left = 0
        Height = 324
        Top = 32
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 4
        WordWrap = False
      end
      object MLedtLines: TSpinEdit
        Left = 208
        Height = 23
        Top = 1
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object MLlblLines: TLabel
        Left = 88
        Height = 15
        Top = 2
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object MLckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object MLedtMessageToPost: TEdit
        Left = 344
        Height = 23
        Top = 2
        Width = 328
        Anchors = [akTop, akLeft, akRight]
        TabOrder = 2
        Text = 'MLedtMessageToPost'
      end
      object MLbtnPostMessage: TButton
        Left = 680
        Height = 25
        Top = 2
        Width = 112
        Anchors = [akTop, akRight]
        Caption = 'PostMessage'
        TabOrder = 3
        OnClick = MLbtnPostMessageClick
      end
    end
    object tshScenLoad: TTabSheet
      Caption = 'ScenLoad'
      ClientHeight = 363
      ClientWidth = 797
      object SLckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object SLlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SLedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object SLmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 40
        Width = 592
        Anchors = [akTop, akLeft, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
      object SLsgLineage: TStringGrid
        Left = 600
        Height = 316
        Top = 40
        Width = 200
        Anchors = [akTop, akLeft, akRight, akBottom]
        ColCount = 6
        Columns = <        
          item
            Title.Caption = 'Date & Time Saved'
            Width = 128
          end        
          item
            Title.Caption = 'Scen ver'
            Width = 64
          end        
          item
            Title.Caption = 'SE version'
            Width = 96
          end        
          item
            Title.Caption = 'DB flavor'
            Width = 192
          end        
          item
            Font.Height = -13
            Font.Name = 'Courier New'
            Title.Caption = 'uuid'
            Width = 320
          end>
        RowCount = 1
        TabOrder = 3
        ColWidths = (
          27
          128
          64
          96
          192
          320
        )
      end
    end
    object tshSaveGame: TTabSheet
      Caption = 'SaveGame'
      ClientHeight = 363
      ClientWidth = 797
      object SGmemMsgLog1: TMemo
        Left = 0
        Height = 310
        Top = 56
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 0
        WordWrap = False
      end
      object SGckbEnabled1: TCheckBox
        Left = 4
        Height = 19
        Top = 24
        Width = 60
        Caption = 'Enabled'
        TabOrder = 1
      end
      object SGlblLines1: TLabel
        Left = 172
        Height = 15
        Top = 24
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SGedtLines1: TSpinEdit
        Left = 320
        Height = 23
        Top = 24
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 2
        Value = 1024
      end
      object SGlblDescription1: TLabel
        Left = 4
        Height = 15
        Top = 0
        Width = 375
        Caption = 'SaveGame fires after the game is saved but before the UUIDs are shifted'
        ParentColor = False
      end
      object SGfneSaveName: TFileNameEdit
        Left = 440
        Height = 23
        Top = 24
        Width = 344
        FileName = 'ExportDLLSave'
        FilterIndex = 0
        HideDirectories = False
        ButtonWidth = 23
        NumGlyphs = 1
        Anchors = [akTop, akLeft, akRight]
        MaxLength = 0
        TabOrder = 3
        OnChange = SGfneSaveNameChange
        Text = 'ExportDLLSave'
      end
    end
    object tshStartGroup: TTabSheet
      Caption = 'StartGroup'
      ClientHeight = 363
      ClientWidth = 797
      object SGckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object SGlblLines: TLabel
        Left = 84
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SGedtLines: TSpinEdit
        Left = 204
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object SGmemMsgLog: TMemo
        Left = 0
        Height = 303
        Top = 56
        Width = 108
        Anchors = [akTop, akLeft, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
      object SGlblDesc: TLabel
        Left = 304
        Height = 15
        Top = 0
        Width = 359
        Caption = 'Receives PHCGroup so you can iterate over all Groups & Units in scen.'
        ParentColor = False
      end
      object SGpnl1: TPanel
        Left = 116
        Height = 328
        Top = 32
        Width = 681
        Anchors = [akTop, akLeft, akRight, akBottom]
        Caption = 'SGpnl1'
        ClientHeight = 328
        ClientWidth = 681
        TabOrder = 3
        object SGlblGroups: TLabel
          Left = 8
          Height = 15
          Top = 8
          Width = 38
          Caption = 'Groups'
          ParentColor = False
        end
        object SGlbxGroups: TListBox
          Left = 8
          Height = 286
          Top = 32
          Width = 112
          Anchors = [akTop, akLeft, akBottom]
          ItemHeight = 0
          TabOrder = 0
          OnDblClick = SGlbxGroupsDblClick
          OnSelectionChange = SGlbxGroupsSelectionChange
        end
        object SGlbxUnits: TListBox
          Left = 124
          Height = 256
          Top = 32
          Width = 148
          ItemHeight = 0
          TabOrder = 1
          OnDblClick = SGlbxUnitsDblClick
          OnSelectionChange = SGlbxUnitsSelectionChange
        end
        object SGlblUnits: TLabel
          Left = 128
          Height = 15
          Top = 8
          Width = 27
          Caption = 'Units'
          ParentColor = False
        end
        object SGpnlUnit: TPanel
          Left = 280
          Height = 310
          Top = 8
          Width = 395
          Anchors = [akTop, akLeft, akRight, akBottom]
          Caption = 'SGpnlUnit'
          ClientHeight = 310
          ClientWidth = 395
          TabOrder = 2
          object SGlblUnitInfo: TLabel
            Left = 0
            Height = 15
            Top = 0
            Width = 88
            Caption = 'Unit Information'
            ParentColor = False
          end
          object SGlblUnitIDName: TLabel
            Left = 8
            Height = 15
            Top = 16
            Width = 377
            Anchors = [akTop, akLeft, akRight]
            AutoSize = False
            ParentColor = False
          end
          object SGlblUnitClassName: TLabel
            Left = 8
            Height = 15
            Top = 32
            Width = 377
            Anchors = [akTop, akLeft, akRight]
            AutoSize = False
            ParentColor = False
          end
        end
        object SGbtnFreeGroup: TButton
          Left = 56
          Height = 25
          Top = 7
          Width = 59
          Caption = 'Free'
          Enabled = False
          TabOrder = 3
          OnClick = SGbtnFreeGroupClick
        end
        object SGbtnFreeUnit: TButton
          Left = 160
          Height = 25
          Top = 7
          Width = 59
          Caption = 'Free'
          Enabled = False
          TabOrder = 4
          OnClick = SGbtnFreeUnitClick
        end
      end
      object SGbtnRefresh: TButton
        Left = 14
        Height = 25
        Top = 24
        Width = 75
        Caption = 'Refresh'
        TabOrder = 4
        OnClick = SGbtnRefreshClick
      end
      object SGlblDesc2: TLabel
        Left = 304
        Height = 15
        Top = 16
        Width = 318
        Caption = 'Double-click a Group or Unit to set it as ActGroup or ActUnit'
        ParentColor = False
      end
    end
    object tshHH: TTabSheet
      Caption = 'HarpoonEventHead'
      ClientHeight = 363
      ClientWidth = 797
      object HHedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 0
        Value = 1024
      end
      object HHlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object HHckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 1
      end
      object HHmemMsgLog: TMemo
        Left = 0
        Height = 375
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
      object HHQueueEventMessage: TButton
        Left = 404
        Height = 21
        Top = 1
        Width = 132
        Caption = 'Create Staff Message'
        TabOrder = 3
        OnClick = HHQueueEventMessageClick
      end
    end
    object tshHQ: TTabSheet
      Caption = 'HarpoonEventQueued'
      ClientHeight = 363
      ClientWidth = 797
      object HQedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 0
        Value = 1024
      end
      object HQlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object HQckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 1
      end
      object HQmemMsgLog: TMemo
        Left = 0
        Height = 344
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshSH: TTabSheet
      Caption = 'SonobuoyRegionHead'
      ClientHeight = 363
      ClientWidth = 797
      object SHckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object SHlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SHedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object SHmemMsgLog: TMemo
        Left = 0
        Height = 395
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshDU: TTabSheet
      Caption = 'AllDeadUnitsPtr'
      ClientHeight = 363
      ClientWidth = 797
      object DUckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object DUlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object DUedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object DUmemMsgLog: TMemo
        Left = 0
        Height = 395
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshWG: TTabSheet
      Caption = 'WeatherGroups'
      ClientHeight = 363
      ClientWidth = 797
      object WGckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object WGlblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object WGedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object WGmemMsgLog: TMemo
        Left = 0
        Height = 375
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshVC: TTabSheet
      Caption = 'VictoryConditionsList'
      ClientHeight = 363
      ClientWidth = 797
      object VCckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 1
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object VClblLines: TLabel
        Left = 172
        Height = 15
        Top = 1
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object VCedtLines: TSpinEdit
        Left = 292
        Height = 23
        Top = 0
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object VCmemMsgLog: TMemo
        Left = 0
        Height = 335
        Top = 24
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshGT: TTabSheet
      Caption = 'GameTime/Investigate Structures'
      ClientHeight = 363
      ClientWidth = 797
      object GTckbPause: TCheckBox
        Left = 4
        Height = 19
        Top = 7
        Width = 283
        Caption = 'Pause next game second to investigate structures?'
        TabOrder = 0
      end
      object GTbtnResume: TButton
        Left = 292
        Height = 25
        Top = 7
        Width = 75
        Caption = 'Resume'
        Enabled = False
        TabOrder = 1
        OnClick = GTbtnResumeClick
      end
      object GTpctStructs: TPageControl
        Left = 4
        Height = 309
        Top = 56
        Width = 793
        ActivePage = GTtshHarpEvents
        Anchors = [akTop, akLeft, akRight, akBottom]
        TabIndex = 2
        TabOrder = 2
        object GTtshStartGroup: TTabSheet
          Caption = 'StartGroup'
          ClientHeight = 281
          ClientWidth = 785
          object Label1: TLabel
            Left = 4
            Height = 45
            Top = 8
            Width = 83
            Caption = 'To Do'
            Font.Color = clMaroon
            Font.Height = -32
            ParentColor = False
            ParentFont = False
          end
        end
        object GTtshWeatherGroups: TTabSheet
          Caption = 'WeatherGroups'
          ClientHeight = 281
          ClientWidth = 785
          object Label2: TLabel
            Left = 4
            Height = 45
            Top = 8
            Width = 83
            Caption = 'To Do'
            Font.Color = clMaroon
            Font.Height = -32
            ParentColor = False
            ParentFont = False
          end
        end
        object GTtshHarpEvents: TTabSheet
          Caption = 'HarpoonEvents'
          ClientHeight = 281
          ClientWidth = 785
          object GTHEEventList: TListBox
            Left = 0
            Height = 281
            Top = 0
            Width = 544
            Align = alLeft
            Font.Height = -16
            Font.Name = 'Courier New'
            ItemHeight = 0
            ParentFont = False
            TabOrder = 0
            OnSelectionChange = GTHEEventListSelectionChange
          end
          object GEHEmemDetail: TMemo
            Left = 549
            Height = 281
            Top = 0
            Width = 236
            Align = alClient
            ScrollBars = ssAutoBoth
            TabOrder = 1
            WordWrap = False
          end
          object Splitter1: TSplitter
            Left = 544
            Height = 281
            Top = 0
            Width = 5
          end
        end
        object GTtshSonoBuoy: TTabSheet
          Caption = 'SonoBuoys'
          ClientHeight = 281
          ClientWidth = 785
          object Label3: TLabel
            Left = 4
            Height = 45
            Top = 8
            Width = 83
            Caption = 'To Do'
            Font.Color = clMaroon
            Font.Height = -32
            ParentColor = False
            ParentFont = False
          end
        end
        object GTtshDeadUnits: TTabSheet
          Caption = 'DeadUnits'
          ClientHeight = 281
          ClientWidth = 785
          object Label4: TLabel
            Left = 4
            Height = 45
            Top = 8
            Width = 83
            Caption = 'To Do'
            Font.Color = clMaroon
            Font.Height = -32
            ParentColor = False
            ParentFont = False
          end
        end
      end
      object GTlblGameTime: TLabel
        Left = 404
        Height = 15
        Top = 7
        Width = 60
        Caption = 'GameTime:'
        ParentColor = False
      end
      object GTlblGameTimeLeft: TLabel
        Left = 544
        Height = 15
        Top = 7
        Width = 80
        Caption = 'GameTimeLeft:'
        ParentColor = False
      end
      object GTlblGameDateTime: TLabel
        Left = 404
        Height = 15
        Top = 32
        Width = 81
        Caption = 'GameDateTime'
        ParentColor = False
      end
      object GTbtnExitGame: TButton
        Left = 4
        Height = 25
        Top = 24
        Width = 75
        Caption = 'Exit Game'
        TabOrder = 3
        OnClick = GTbtnExitGameClick
      end
    end
    object tshAnnexes: TTabSheet
      Caption = 'DB/Annex Data'
      ClientHeight = 363
      ClientWidth = 797
      OnShow = tshAnnexesShow
      object pctAnnexes: TPageControl
        Left = 0
        Height = 333
        Top = 24
        Width = 793
        ActivePage = tshAnnexA1
        Anchors = [akTop, akLeft, akRight, akBottom]
        MultiLine = True
        TabIndex = 0
        TabOrder = 0
        Options = [nboMultiLine]
        object tshAnnexA1: TTabSheet
          Caption = 'Ships/MLUs'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexA1Show
          object memAnnexesA1: TMemo
            Left = 0
            Height = 297
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexA2: TTabSheet
          Caption = 'Subs'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexA2Show
          object memAnnexesA2: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexB1: TTabSheet
          Caption = 'Aircraft'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexB1Show
          object memAnnexesB1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexP1: TTabSheet
          Caption = 'Installations'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexP1Show
          object memAnnexesP1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexY1: TTabSheet
          Caption = 'Loadouts'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexY1Show
          object memAnnexesY1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexC1: TTabSheet
          Caption = 'Guns'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexC1Show
          object memAnnexesC1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexD1: TTabSheet
          Caption = 'Missiles'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexD1Show
          object memAnnexesD1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexG1: TTabSheet
          Caption = 'Bombs'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexG1Show
          object memAnnexesG1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexG2: TTabSheet
          Caption = 'ECM'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexG2Show
          object memAnnexesG2: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexI1: TTabSheet
          Caption = 'Nukes'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexI1Show
          object memAnnexesI1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexJ1: TTabSheet
          Caption = 'Radar'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexJ1Show
          object memAnnexesJ1: TMemo
            Left = 0
            Height = 247
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexM1: TTabSheet
          Caption = 'Sonar'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexM1Show
          object memAnnexesM1: TMemo
            Left = 0
            Height = 222
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexZ1: TTabSheet
          Caption = 'Mounts'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexZ1Show
          object memAnnexesZ1: TMemo
            Left = 0
            Height = 222
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshAnnexZ2: TTabSheet
          Caption = 'Multimounts'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshAnnexZ2Show
          object memAnnexesZ2: TMemo
            Left = 0
            Height = 272
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshBSStrings: TTabSheet
          Caption = 'BattleSet Strings'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshBSStringsShow
          object memBSStrings: TMemo
            Left = 0
            Height = 272
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshMags: TTabSheet
          Caption = 'Magazines'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshMagsShow
          object memMags: TMemo
            Left = 0
            Height = 272
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshShipNames: TTabSheet
          Caption = 'Ship/Sub Names'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshShipNamesShow
          object memShipNames: TMemo
            Left = 0
            Height = 272
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
        object tshPlatDesc: TTabSheet
          Caption = 'Platform Descriptions'
          ClientHeight = 285
          ClientWidth = 785
          OnShow = tshPlatDescShow
          object memPlatDesc: TMemo
            Left = 0
            Height = 272
            Top = 8
            Width = 777
            Anchors = [akTop, akLeft, akRight, akBottom]
            Font.Height = -13
            Font.Name = 'Terminal'
            ParentFont = False
            ScrollBars = ssAutoBoth
            TabOrder = 0
            WordWrap = False
          end
        end
      end
      object SGlblDesc1: TLabel
        Left = 8
        Height = 15
        Top = 0
        Width = 488
        Caption = 'DBLoaded and ScenLoad send an identical pointer to a copy of the Platform/DB information.'
        ParentColor = False
      end
    end
    object tshActGroupUnit: TTabSheet
      Caption = 'ActGroupUnit'
      ClientHeight = 363
      ClientWidth = 797
      object GlblDesc: TLabel
        Left = 0
        Height = 15
        Top = 1
        Width = 567
        Caption = 'Tracks changes in ActGroupPtr and ActUnitPtr so we know which Group and/or Unit the player has selected.'
        ParentColor = False
      end
      object AGckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 25
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object AGlblLines: TLabel
        Left = 172
        Height = 15
        Top = 25
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object AGedtLines: TSpinEdit
        Left = 312
        Height = 23
        Top = 24
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object AGmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 48
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
    object tshDLLStaff: TTabSheet
      Caption = 'StaffAssistant'
      ClientHeight = 363
      ClientWidth = 797
      object SAlblDesc: TLabel
        Left = 0
        Height = 15
        Top = 1
        Width = 290
        Caption = 'Can supplant or reinforce the Staff Assistant dialog box'
        ParentColor = False
      end
      object SAckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 25
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object SAlblLines: TLabel
        Left = 172
        Height = 15
        Top = 25
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SAedtLines: TSpinEdit
        Left = 312
        Height = 23
        Top = 24
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object SAmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 45
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
      object SAckbSkipGE: TCheckBox
        Left = 520
        Height = 19
        Top = 24
        Width = 87
        Caption = 'Skip GE''s SA?'
        TabOrder = 3
      end
    end
    object tshZoomChange: TTabSheet
      Caption = 'ZoomChange'
      ClientHeight = 363
      ClientWidth = 797
      object ZClblDesc: TLabel
        Left = 0
        Height = 15
        Top = 1
        Width = 322
        Caption = 'Notification when Group or Unit window zoom level changes'
        ParentColor = False
      end
      object ZCckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 25
        Width = 60
        Caption = 'Enabled'
        TabOrder = 0
      end
      object ZClblLines: TLabel
        Left = 172
        Height = 15
        Top = 25
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object ZCedtLines: TSpinEdit
        Left = 312
        Height = 23
        Top = 24
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object ZCmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 45
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
      object ZCbtnZoomGroupIn: TButton
        Left = 424
        Height = 25
        Top = 15
        Width = 56
        Caption = 'Group+'
        TabOrder = 3
        OnClick = ZCbtnZoomGroupInClick
      end
      object ZCbtnZoomGroupOut: TButton
        Left = 488
        Height = 25
        Top = 15
        Width = 56
        Caption = 'Group-'
        TabOrder = 4
        OnClick = ZCbtnZoomGroupOutClick
      end
      object ZCbtnZoomUnitOut: TButton
        Left = 624
        Height = 25
        Top = 15
        Width = 56
        Caption = 'Unit-'
        TabOrder = 5
        OnClick = ZCbtnZoomUnitOutClick
      end
      object ZCbtnZoomUnitIn: TButton
        Left = 560
        Height = 25
        Top = 15
        Width = 56
        Caption = 'Unit+'
        TabOrder = 6
        OnClick = ZCbtnZoomUnitInClick
      end
    end
    object tshStoreConsumed: TTabSheet
      Caption = 'StoreConsumed'
      ClientHeight = 363
      ClientWidth = 797
      object SClblDesc: TLabel
        Left = 0
        Height = 15
        Top = 1
        Width = 322
        Caption = 'Notification when Group or Unit window zoom level changes'
        ParentColor = False
      end
      object SCckbEnabled: TCheckBox
        Left = 4
        Height = 19
        Top = 25
        Width = 60
        Caption = 'Enabled'
        Checked = True
        State = cbChecked
        TabOrder = 0
      end
      object SClblLines: TLabel
        Left = 172
        Height = 15
        Top = 25
        Width = 111
        Caption = 'Keep this many lines:'
        ParentColor = False
      end
      object SCedtLines: TSpinEdit
        Left = 312
        Height = 23
        Top = 24
        Width = 90
        MaxValue = 16384
        MinValue = 128
        TabOrder = 1
        Value = 1024
      end
      object SCmemMsgLog: TMemo
        Left = 0
        Height = 318
        Top = 45
        Width = 796
        Anchors = [akTop, akLeft, akRight, akBottom]
        Font.CharSet = ANSI_CHARSET
        Font.Height = -13
        Font.Name = 'Lucida Console'
        Font.Pitch = fpFixed
        Font.Quality = fqDraft
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssAutoBoth
        TabOrder = 2
        WordWrap = False
      end
    end
  end
end