object Form1: TForm1
  Left = 238
  Height = 377
  Top = 103
  Width = 1100
  Caption = 'SRV.mORMot REST test'
  ClientHeight = 377
  ClientWidth = 1100
  Color = clBtnFace
  Constraints.MinHeight = 325
  Constraints.MinWidth = 1100
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  Position = poScreenCenter
  LCLVersion = '1.7'
  object LabelPortCap: TLabel
    Left = 883
    Height = 13
    Top = 28
    Width = 24
    Anchors = [akTop, akRight]
    Caption = 'Port:'
    ParentColor = False
  end
  object LabelAuthenticationMode: TLabel
    Left = 37
    Height = 13
    Top = 38
    Width = 74
    Caption = 'Authentication:'
    ParentColor = False
  end
  object LabelProtocol: TLabel
    Left = 68
    Height = 13
    Top = 11
    Width = 43
    Caption = 'Protocol:'
    ParentColor = False
  end
  object LabelHTTPSnote: TLabel
    Left = 511
    Height = 13
    Top = 11
    Width = 235
    Caption = 'Don''t forget enable https support (check exe dir)'
    Font.Color = 136
    Font.Height = -11
    Font.Name = 'Tahoma'
    ParentColor = False
    ParentFont = False
    Visible = False
  end
  object EditPort: TEdit
    Left = 913
    Height = 21
    Top = 25
    Width = 60
    Anchors = [akTop, akRight]
    TabOrder = 0
    Text = '777'
  end
  object ButtonStartStop: TButton
    Left = 985
    Height = 33
    Top = 19
    Width = 105
    Anchors = [akTop, akRight]
    Caption = 'Start server'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    OnClick = ButtonStartStopClick
    ParentFont = False
    TabOrder = 1
  end
  object MemoLog: TMemo
    Left = 8
    Height = 69
    Top = 272
    Width = 1082
    Anchors = [akTop, akLeft, akRight, akBottom]
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Consolas'
    ParentFont = False
    ScrollBars = ssVertical
    TabOrder = 2
  end
  object ButtonCLS: TButton
    Left = 10
    Height = 22
    Top = 347
    Width = 38
    Anchors = [akLeft, akBottom]
    Caption = 'CLS'
    OnClick = ButtonCLSClick
    TabOrder = 3
  end
  object CheckBoxAutoScroll: TCheckBox
    Left = 57
    Height = 19
    Top = 347
    Width = 69
    Anchors = [akLeft, akBottom]
    Caption = 'auto scroll'
    Checked = True
    State = cbChecked
    TabOrder = 4
  end
  object ComboBoxAuthentication: TComboBox
    Left = 117
    Height = 21
    Top = 35
    Width = 388
    ItemHeight = 13
    ItemIndex = 1
    Items.Strings = (
      'No authentication'
      'Default'
      'None'
      'HttpBasic'
      'SSPI'
    )
    OnChange = ComboBoxAuthenticationChange
    Style = csDropDownList
    TabOrder = 5
    Text = 'Default'
  end
  object ButtonShowAuthorizationInfo: TButton
    Left = 511
    Height = 19
    Top = 36
    Width = 42
    Caption = 'Info'
    OnClick = ButtonShowAuthorizationInfoClick
    TabOrder = 6
  end
  object CheckBoxDisableLog: TCheckBox
    Left = 133
    Height = 19
    Top = 347
    Width = 204
    Anchors = [akLeft, akBottom]
    Caption = 'disable log (for max performance test)'
    OnClick = CheckBoxDisableLogClick
    TabOrder = 7
  end
  object ComboBoxProtocol: TComboBox
    Left = 117
    Height = 21
    Top = 8
    Width = 388
    DropDownCount = 10
    ItemHeight = 13
    ItemIndex = 7
    Items.Strings = (
      'HTTP              ( socket )'
      ' › HTTP           ( fast http.sys // require admin rights else socket )'
      ' ›› HTTPS        ( fast http.sys + SSL // require admin rights )'
      ' › HTTP           ( fast http.sys + AES-CFB 256 // require admin rights )'
      'HTTP              ( web socket )'
      ' › WebSocket ( bidirectional, JSON )'
      ' › WebSocket ( bidirectional, binary )'
      ' › WebSocket ( bidirectional, binary + AES-CFB 256)'
      'Named pipe'
    )
    OnChange = ComboBoxProtocolChange
    Style = csDropDownList
    TabOrder = 8
    Text = ' › WebSocket ( bidirectional, binary + AES-CFB 256)'
  end
  object GroupBoxMethodGroupConfiguration: TGroupBox
    Left = 164
    Height = 203
    Top = 62
    Width = 520
    Caption = 'Method / Group configuration'
    ClientHeight = 185
    ClientWidth = 516
    TabOrder = 9
    object ListViewMethodGroups: TListView
      Left = 10
      Height = 133
      Top = 16
      Width = 503
      Columns = <      
        item
          Caption = ' Method'
          Width = 150
        end      
        item
          Caption = ' Allow group by name'
          Width = 160
        end      
        item
          Caption = ' Deny group by name'
          Width = 160
        end>
      HideSelection = False
      Items.LazData = {
        AB01000006000000FFFFFFFFFFFFFFFFFFFFFFFF020000000A00000048656C6C
        6F576F726C641400000055736572732C41646D696E6973747261746F72730B00
        0000536F6D656F6E65456C7365FFFFFFFFFFFFFFFFFFFFFFFF02000000030000
        0053756D1400000055736572732C41646D696E6973747261746F727300000000
        FFFFFFFFFFFFFFFFFFFFFFFF020000000F000000476574437573746F6D526563
        6F72640E00000041646D696E6973747261746F727300000000FFFFFFFFFFFFFF
        FFFFFFFFFF020000001000000053656E64437573746F6D5265636F72640E0000
        0041646D696E6973747261746F727300000000FFFFFFFFFFFFFFFFFFFFFFFF02
        0000001900000053656E644D756C7469706C65437573746F6D5265636F726473
        0E00000041646D696E6973747261746F727300000000FFFFFFFFFFFFFFFFFFFF
        FFFF02000000150000004765744D6574686F64437573746F6D526573756C7414
        00000055736572732C41646D696E6973747261746F727300000000FFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFF
      }
      ReadOnly = True
      RowSelect = True
      TabOrder = 0
      ViewStyle = vsReport
      OnClick = ListViewMethodGroupsClick
      OnSelectItem = ListViewMethodGroupsSelectItem
    end
    object ButtonSaveRoleConfiguration: TButton
      Left = 463
      Height = 25
      Top = 155
      Width = 50
      Caption = 'Save'
      OnClick = ButtonSaveRoleConfigurationClick
      TabOrder = 1
    end
    object EditAllowGroupNames: TEdit
      Left = 136
      Height = 21
      Top = 157
      Width = 160
      TabOrder = 2
      TextHint = 'Allow group names  (sep by ",")'
    end
    object EditDenyAllowGroupNames: TEdit
      Left = 298
      Height = 21
      Top = 157
      Width = 159
      TabOrder = 3
      TextHint = 'Deny group names (sep by ",")'
    end
  end
  object RadioGroupAuthorizationPolicy: TRadioGroup
    Left = 8
    Height = 73
    Top = 62
    Width = 150
    AutoFill = True
    Caption = 'Authorization policy'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 55
    ClientWidth = 146
    ItemIndex = 2
    Items.Strings = (
      'Allow all'
      'Deny all'
      'Follow groups settings'
    )
    OnClick = RadioGroupAuthorizationPolicyClick
    TabOrder = 10
  end
  object GroupBoxUsers: TGroupBox
    Left = 690
    Height = 203
    Top = 62
    Width = 383
    Caption = 'Users'
    ClientHeight = 185
    ClientWidth = 379
    TabOrder = 11
    object ListViewUsers: TListView
      Left = 9
      Height = 133
      Top = 16
      Width = 365
      Columns = <      
        item
          Caption = ' User'
          Width = 110
        end      
        item
          Caption = ' Password'
          Width = 110
        end      
        item
          Caption = ' Group'
          Width = 110
        end>
      HideSelection = False
      Items.LazData = {
        7300000002000000FFFFFFFFFFFFFFFFFFFFFFFF020000000600000047656F72
        6765030000003132330E00000041646D696E6973747261746F7273FFFFFFFFFF
        FFFFFFFFFFFFFF0200000004000000416C657803000000333231050000005573
        657273FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      }
      ReadOnly = True
      RowSelect = True
      TabOrder = 0
      ViewStyle = vsReport
      OnClick = ListViewUsersClick
      OnSelectItem = ListViewUsersSelectItem
    end
    object EditUserGroup: TEdit
      Left = 223
      Height = 21
      Top = 157
      Width = 83
      TabOrder = 1
      TextHint = 'Group'
    end
    object ButtonSaveUsers: TButton
      Left = 312
      Height = 25
      Top = 155
      Width = 62
      Caption = 'Save/Add'
      OnClick = ButtonSaveUsersClick
      TabOrder = 2
    end
    object EditUserName: TEdit
      Left = 53
      Height = 21
      Top = 157
      Width = 83
      TabOrder = 3
      TextHint = 'User'
    end
    object ButtonDeleteUser: TButton
      Left = 9
      Height = 25
      Top = 155
      Width = 38
      Caption = 'DeL'
      OnClick = ButtonDeleteUserClick
      TabOrder = 4
    end
    object EditUserPassword: TEdit
      Left = 138
      Height = 21
      Top = 157
      Width = 83
      TabOrder = 5
      TextHint = 'Password'
    end
  end
  object TimerRefreshLogMemo: TTimer
    OnTimer = TimerRefreshLogMemoTimer
    left = 56
    top = 264
  end
end
