object frmMain: TfrmMain
  Left = 369
  Height = 251
  Top = 131
  Width = 525
  Caption = 'TestGroupIds'
  ClientHeight = 251
  ClientWidth = 525
  LCLVersion = '2.0.8.0'
  object PageControl1: TPageControl
    Left = 0
    Height = 251
    Top = 0
    Width = 525
    ActivePage = tshStartGroup
    Anchors = [akTop, akLeft, akRight, akBottom]
    MultiLine = True
    TabIndex = 2
    TabOrder = 0
    Options = [nboMultiLine]
    object tshDLLInit: TTabSheet
      Caption = 'DLLInit'
      ClientHeight = 223
      ClientWidth = 517
      object memDLLInit: TMemo
        Left = 4
        Height = 235
        Top = 8
        Width = 505
        Anchors = [akTop, akLeft, akRight, akBottom]
        ScrollBars = ssAutoBoth
        TabOrder = 0
      end
    end
    object tshMsgLog: TTabSheet
      Caption = 'MsgLog'
      ClientHeight = 223
      ClientWidth = 517
      TabVisible = False
      object MLmemMsgLog: TMemo
        Left = 0
        Height = 184
        Top = 32
        Width = 516
        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 = 62
        Caption = 'Enabled'
        TabOrder = 0
      end
      object MLedtMessageToPost: TEdit
        Left = 344
        Height = 23
        Top = 2
        Width = 48
        Anchors = [akTop, akLeft, akRight]
        TabOrder = 2
        Text = 'MLedtMessageToPost'
      end
      object MLbtnPostMessage: TButton
        Left = 400
        Height = 25
        Top = 2
        Width = 112
        Anchors = [akTop, akRight]
        Caption = 'PostMessage'
        OnClick = MLbtnPostMessageClick
        TabOrder = 3
      end
    end
    object tshStartGroup: TTabSheet
      Caption = 'Add Groups'
      ClientHeight = 223
      ClientWidth = 517
      object SGpnl1: TPanel
        Left = 0
        Height = 196
        Top = 24
        Width = 511
        Anchors = [akTop, akLeft, akRight, akBottom]
        ClientHeight = 196
        ClientWidth = 511
        TabOrder = 0
        object SGlblGroups: TLabel
          Left = 8
          Height = 15
          Top = 8
          Width = 38
          Caption = 'Groups'
          ParentColor = False
        end
        object SGlbxGroups: TListBox
          Left = 8
          Height = 154
          Top = 32
          Width = 112
          Anchors = [akTop, akLeft, akBottom]
          ItemHeight = 0
          TabOrder = 0
        end
        object SGpnlUnit: TPanel
          Left = 296
          Height = 178
          Top = 8
          Width = 209
          Anchors = [akTop, akLeft, akRight, akBottom]
          ClientHeight = 178
          ClientWidth = 209
          TabOrder = 1
          object SGlblUnitInfo: TLabel
            Left = 0
            Height = 15
            Top = 0
            Width = 92
            Caption = 'Groups to Create:'
            ParentColor = False
          end
          object SGlblUnitIDName: TLabel
            Left = 8
            Height = 15
            Top = 16
            Width = 191
            Anchors = [akTop, akLeft, akRight]
            AutoSize = False
            ParentColor = False
          end
          object edGroups2Create: TEdit
            Left = 12
            Height = 23
            Top = 24
            Width = 80
            Alignment = taRightJustify
            TabOrder = 0
            Text = '100'
          end
          object btnCreateGroups: TButton
            Left = 80
            Height = 25
            Top = 144
            Width = 112
            Caption = 'Create Groups'
            OnClick = btnCreateGroupsClick
            TabOrder = 1
          end
          object SGlblUnitInfo1: TLabel
            Left = 16
            Height = 15
            Top = 56
            Width = 44
            Caption = 'For side:'
            ParentColor = False
          end
          object lbxSides: TListBox
            Left = 32
            Height = 58
            Top = 78
            Width = 100
            ItemHeight = 0
            TabOrder = 2
          end
        end
        object Label1: TLabel
          Left = 136
          Height = 15
          Top = 8
          Width = 41
          Caption = 'Counts:'
          ParentColor = False
        end
        object lblGroups: TLabel
          Left = 144
          Height = 15
          Top = 24
          Width = 136
          AutoSize = False
          Caption = 'Groups:'
          ParentColor = False
        end
        object lblGroupsBlue: TLabel
          Left = 144
          Height = 15
          Top = 56
          Width = 136
          AutoSize = False
          Caption = 'Blue Groups:'
          ParentColor = False
        end
        object lblGroupsRed: TLabel
          Left = 144
          Height = 15
          Top = 72
          Width = 136
          AutoSize = False
          Caption = 'Red Groups:'
          ParentColor = False
        end
        object lblGroupsGreen: TLabel
          Left = 144
          Height = 15
          Top = 88
          Width = 136
          AutoSize = False
          Caption = 'Green Groups:'
          ParentColor = False
        end
        object lblGroupsBlueRed: TLabel
          Left = 144
          Height = 15
          Top = 40
          Width = 136
          AutoSize = False
          Caption = 'Blue + Red Groups:'
          ParentColor = False
        end
      end
      object SGbtnRefresh: TButton
        Left = 0
        Height = 20
        Top = 4
        Width = 75
        Caption = 'Refresh'
        OnClick = SGbtnRefreshClick
        TabOrder = 1
      end
    end
  end
end