object frmMain: TfrmMain
  ActiveControl = tabProcesses
  BorderStyle = bsToolWindow
  Caption = 'Basic TCP client/server demo'
  ClientHeight = 283
  ClientWidth = 350
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  HorzScrollBar.Page = 349
  VertScrollBar.Page = 282
  Left = 203
  Height = 283
  Top = 107
  Width = 350
  object Label1: TLabel
    Caption = 'Server'
    Color = clNone
    Font.Color = clNavy
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Left = 4
    Height = 24
    Top = 4
    Width = 62
  end
  object pgeMain: TPageControl
    ActivePage = tabProcesses
    Anchors = [akTop, akLeft, akRight, akBottom]
    TabIndex = 0
    TabOrder = 0
    Left = 4
    Height = 203
    Top = 32
    Width = 342
    object tabProcesses: TTabSheet
      Caption = 'Processes'
      ClientHeight = 177
      ClientWidth = 334
      Height = 177
      Width = 334
      object lbProcesses: TListBox
        Align = alClient
        ItemHeight = 13
        TabOrder = 0
        Height = 177
        Width = 334
      end
    end
    object tabMain: TTabSheet
      Caption = 'Settings'
      ClientHeight = 177
      ClientWidth = 334
      ImageIndex = 1
      Height = 177
      Width = 334
      object Label2: TLabel
        Caption = 'Bind to IPs'
        Color = clNone
        Left = 4
        Height = 13
        Top = 8
        Width = 51
      end
      object Label3: TLabel
        Caption = 'Bind to port'
        Color = clNone
        Left = 120
        Height = 13
        Top = 8
        Width = 54
      end
      object Label4: TLabel
        Caption = 'Select port from stack list'
        Color = clNone
        Left = 120
        Height = 13
        Top = 64
        Width = 118
      end
      object lbIPs: TCheckListBox
        ItemHeight = 13
        TabOrder = 0
        Left = 4
        Height = 133
        Top = 24
        Width = 109
      end
      object cboPorts: TComboBox
        MaxLength = 0
        OnChange = cboPortsChange
        Style = csDropDownList
        TabOrder = 1
        Left = 120
        Height = 21
        Top = 80
        Width = 145
      end
      object edtPort: TEdit
        TabOrder = 2
        Text = '9099'
        Left = 120
        Height = 21
        Top = 24
        Width = 65
      end
    end
  end
  object btnStartServer: TButton
    Anchors = [akLeft, akBottom]
    Caption = '&Start server'
    OnClick = btnStartServerClick
    TabOrder = 1
    Left = 4
    Height = 25
    Top = 238
    Width = 75
  end
  object btnStopServer: TButton
    Anchors = [akLeft, akBottom]
    Caption = 'S&top server'
    OnClick = btnStopServerClick
    TabOrder = 2
    Left = 81
    Height = 25
    Top = 238
    Width = 75
  end
  object btnExit: TButton
    Anchors = [akRight, akBottom]
    Caption = 'E&xit'
    OnClick = btnExitClick
    TabOrder = 3
    Left = 271
    Height = 25
    Top = 238
    Width = 75
  end
  object StatusBar: TStatusBar
    Panels = <>
    SimpleText = 'Server stopped'
    Height = 20
    Top = 263
    Width = 350
  end
  object btnClearMessages: TButton
    Caption = 'Clear messages'
    OnClick = btnClearMessagesClick
    TabOrder = 4
    Left = 158
    Height = 25
    Top = 238
    Width = 90
  end
end
