optionsDlg.dfm

object optionsFrm: ToptionsFrm
  Left = 287
  Top = 162
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Options'
  ClientHeight = 449
  ClientWidth = 805
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object pageCtrl: TPageControl
    Left = 0
    Top = 0
    Width = 805
    Height = 414
    ActivePage = accountsPage
    Align = alClient
    Images = mainFrm.images
    MultiLine = True
    TabOrder = 0
    object bansPage: TTabSheet
      Caption = 'Bans'
      ImageIndex = 25
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 797
        Height = 30
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        object addBtn: TButton
          Left = 4
          Top = 5
          Width = 73
          Height = 21
          Caption = 'Add row'
          TabOrder = 0
          OnClick = addBtnClick
        end
        object deleteBtn: TButton
          Left = 86
          Top = 5
          Width = 73
          Height = 21
          Caption = 'Delete row'
          TabOrder = 1
          OnClick = deleteBtnClick
        end
        object sortBanBtn: TButton
          Left = 168
          Top = 5
          Width = 73
          Height = 21
          Caption = 'Sort'
          TabOrder = 2
          OnClick = sortBanBtnClick
        end
      end
      object bansBox: TValueListEditor
        Left = 0
        Top = 30
        Width = 797
        Height = 329
        Align = alClient
        KeyOptions = [keyEdit, keyAdd, keyDelete]
        Strings.Strings = (
          '=')
        TabOrder = 1
        TitleCaptions.Strings = (
          'IP address mask'
          'Comment')
        ColWidths = (
          108
          683)
      end
      object Panel3: TPanel
        Left = 0
        Top = 359
        Width = 797
        Height = 26
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 2
        object noreplybanChk: TCheckBox
          Left = 5
          Top = 5
          Width = 145
          Height = 17
          Caption = 'Disconnect with no reply'
          TabOrder = 0
        end
        object Button1: TButton
          Left = 176
          Top = 4
          Width = 141
          Height = 19
          Caption = 'How to invert the logic?'
          TabOrder = 1
          OnClick = Button1Click
        end
      end
    end
    object accountsPage: TTabSheet
      Caption = 'Accounts'
      ImageIndex = 29
      DesignSize = (
        797
        385)
      object Label1: TLabel
        Left = 9
        Top = 16
        Width = 57
        Height = 14
        Caption = 'Account list'
        FocusControl = accountsBox
      end
      object Label7: TLabel
        Left = 251
        Top = 349
        Width = 328
        Height = 14
        Hint = 'You also need to right click on the folder, then restrict access'
        Anchors = [akLeft, akBottom]
        Caption = 
          'WARNING: creating an account is not enough to protect  your file' +
          's...'
        ParentShowHint = False
        ShowHint = True
        WordWrap = True
      end
      object accountpropGrp: TGroupBox
        Left = 163
        Top = 26
        Width = 619
        Height = 317
        Anchors = [akLeft, akTop, akRight, akBottom]
        Caption = 'Account properties'
        TabOrder = 7
        DesignSize = (
          619
          317)
        object Label3: TLabel
          Left = 11
          Top = 173
          Width = 312
          Height = 28
          Caption = 'Here you can see protected resources this user can access...'
          FocusControl = accountAccessBox
          WordWrap = True
        end
        object Label8: TLabel
          Left = 345
          Top = 20
          Width = 28
          Height = 14
          Caption = 'Notes'
          FocusControl = notesBox
          WordWrap = True
        end
        object accountenabledChk: TCheckBox
          Left = 11
          Top = 20
          Width = 97
          Height = 17
          Caption = '&Enabled'
          TabOrder = 0
          OnClick = accountenabledChkClick
        end
        object accountAccessBox: TTreeView
          Left = 11
          Top = 192
          Width = 302
          Height = 116
          Anchors = [akLeft, akTop, akBottom]
          Images = mainFrm.images
          Indent = 19
          ParentShowHint = False
          ReadOnly = True
          ShowHint = False
          ShowRoot = False
          TabOrder = 7
          OnContextPopup = accountAccessBoxContextPopup
          OnDblClick = accountAccessBoxDblClick
        end
        object ignoreLimitsChk: TCheckBox
          Left = 226
          Top = 20
          Width = 97
          Height = 17
          Caption = '&Ignore limits'
          TabOrder = 2
        end
        object pwdBox: TLabeledEdit
          Left = 11
          Top = 63
          Width = 198
          Height = 22
          EditLabel.Width = 50
          EditLabel.Height = 14
          EditLabel.Caption = '&Password'
          ParentShowHint = False
          PasswordChar = '*'
          ShowHint = True
          TabOrder = 3
          OnChange = pwdBoxChange
          OnMouseEnter = pwdBoxMouseEnter
        end
        object redirBox: TLabeledEdit
          Left = 11
          Top = 106
          Width = 198
          Height = 22
          EditLabel.Width = 105
          EditLabel.Height = 14
          EditLabel.Caption = 'After login, redirect to'
          TabOrder = 4
          OnChange = redirBoxChange
        end
        object accountLinkBox: TLabeledEdit
          Left = 11
          Top = 146
          Width = 198
          Height = 22
          EditLabel.Width = 51
          EditLabel.Height = 14
          EditLabel.Caption = 'Member of'
          TabOrder = 5
          OnExit = accountLinkBoxExit
        end
        object groupChk: TCheckBox
          Left = 114
          Top = 20
          Width = 97
          Height = 17
          Caption = '&Group'
          TabOrder = 1
          OnClick = groupChkClick
        end
        object groupsBtn: TButton
          Left = 215
          Top = 146
          Width = 90
          Height = 21
          Caption = 'Choose...'
          TabOrder = 6
          OnClick = groupsBtnClick
        end
        object notesBox: TMemo
          Left = 345
          Top = 39
          Width = 271
          Height = 269
          Anchors = [akLeft, akTop, akRight, akBottom]
          ParentShowHint = False
          ScrollBars = ssVertical
          ShowHint = False
          TabOrder = 8
        end
        object notesWrapChk: TCheckBox
          Left = 502
          Top = 21
          Width = 91
          Height = 17
          Anchors = [akTop, akRight]
          Caption = 'Wrap'
          Checked = True
          State = cbChecked
          TabOrder = 9
          OnClick = notesWrapChkClick
        end
      end
      object deleteaccountBtn: TButton
        Left = 3
        Top = 351
        Width = 45
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'de&lete'
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = deleteaccountBtnClick
      end
      object renaccountBtn: TButton
        Left = 53
        Top = 328
        Width = 49
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = '&rename'
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = renaccountBtnClick
      end
      object addaccountBtn: TButton
        Left = 3
        Top = 328
        Width = 45
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'ad&d'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = addaccountBtnClick
      end
      object upBtn: TButton
        Left = 107
        Top = 328
        Width = 45
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = '&up'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = upBtnClick
        OnMouseUp = upBtnMouseUp
      end
      object downBtn: TButton
        Left = 107
        Top = 351
        Width = 45
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'do&wn'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = upBtnClick
        OnMouseUp = upBtnMouseUp
      end
      object sortBtn: TButton
        Left = 53
        Top = 351
        Width = 49
        Height = 17
        Anchors = [akLeft, akBottom]
        Caption = 'sort'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = sortBtnClick
        OnMouseUp = upBtnMouseUp
      end
      object accountsBox: TListView
        Left = 3
        Top = 35
        Width = 149
        Height = 287
        Anchors = [akLeft, akTop, akBottom]
        Columns = <>
        DragMode = dmAutomatic
        HideSelection = False
        OwnerData = True
        RowSelect = True
        ParentShowHint = False
        ShowHint = False
        SmallImages = mainFrm.images
        TabOrder = 0
        ViewStyle = vsList
        OnChange = accountsBoxChange
        OnClick = accountsBoxClick
        OnData = accountsBoxData
        OnDblClick = accountsBoxDblClick
        OnEdited = accountsBoxEdited
        OnEditing = accountsBoxEditing
        OnDragDrop = accountsBoxDragDrop
        OnDragOver = accountsBoxDragOver
        OnKeyDown = accountsBoxKeyDown
        OnKeyPress = accountsBoxKeyPress
      end
    end
    object mimePage: TTabSheet
      Caption = 'MIME types'
      ImageIndex = 7
      object mimeBox: TValueListEditor
        Left = 0
        Top = 30
        Width = 797
        Height = 355
        Align = alClient
        KeyOptions = [keyEdit, keyAdd, keyDelete]
        Strings.Strings = (
          '=')
        TabOrder = 0
        TitleCaptions.Strings = (
          'File Mask'
          'MIME Description')
        ColWidths = (
          108
          683)
      end
      object Panel5: TPanel
        Left = 0
        Top = 0
        Width = 797
        Height = 30
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 1
        object addMimeBtn: TButton
          Left = 4
          Top = 5
          Width = 73
          Height = 21
          Caption = 'Add row'
          TabOrder = 0
          OnClick = addMimeBtnClick
        end
        object deleteMimeBtn: TButton
          Left = 86
          Top = 5
          Width = 73
          Height = 21
          Caption = 'Delete row'
          TabOrder = 1
          OnClick = deleteMimeBtnClick
        end
        object inBrowserIfMIMEchk: TCheckBox
          Left = 184
          Top = 7
          Width = 305
          Height = 17
          Caption = 'Open directly in browser when MIME type is defined'
          TabOrder = 2
        end
      end
    end
    object trayPage: TTabSheet
      Caption = 'Tray Message'
      ImageIndex = 10
      object Label2: TLabel
        Left = 8
        Top = 16
        Width = 292
        Height = 168
        Caption = 
          'You can customize the message in the tray icon tip. '#13#10'The messag' +
          'e length is determined by your Windows version'#13#10'(in XP the limit' +
          ' is 127 characters including spaces).'#13#10'Available symbols:'#13#10#13#10'  %' +
          'uptime% - server uptime'#13#10'  %url% - server main URL'#13#10'  %ip% - IP ' +
          'address set as default'#13#10'  %port% - Port on which the server is l' +
          'istening'#13#10'  %hits% - number of requests made to the server'#13#10'  %d' +
          'ownloads% - number of files downloaded'#13#10'  %version% - HFS versio' +
          'n'
      end
      object Label10: TLabel
        Left = 291
        Top = 170
        Width = 40
        Height = 14
        Caption = 'Preview'
      end
      object traymsgBox: TMemo
        Left = 16
        Top = 192
        Width = 233
        Height = 121
        Lines.Strings = (
          'traymsgBox')
        TabOrder = 0
        OnChange = traymsgBoxChange
      end
      object traypreviewBox: TMemo
        Left = 291
        Top = 192
        Width = 233
        Height = 121
        Color = clInfoBk
        ReadOnly = True
        TabOrder = 1
      end
    end
    object a2nPage: TTabSheet
      Caption = 'Address2name'
      ImageIndex = -1
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 797
        Height = 67
        Align = alTop
        Alignment = taLeftJustify
        BevelOuter = bvNone
        TabOrder = 0
        object Label4: TLabel
          Left = 8
          Top = 8
          Width = 243
          Height = 28
          Caption = 
            'You can associate a label to an address (or many addresses). It ' +
            'will be used in the log.'
          WordWrap = True
        end
        object deleteA2Nbtn: TButton
          Left = 83
          Top = 40
          Width = 73
          Height = 21
          Caption = '&Delete row'
          TabOrder = 0
          OnClick = deleteA2NbtnClick
        end
        object addA2Nbtn: TButton
          Left = 4
          Top = 41
          Width = 73
          Height = 21
          Caption = 'Add &row'
          TabOrder = 1
          OnClick = addA2NbtnClick
        end
      end
      object a2nBox: TValueListEditor
        Left = 0
        Top = 67
        Width = 797
        Height = 318
        Align = alClient
        KeyOptions = [keyEdit, keyAdd, keyDelete]
        Strings.Strings = (
          '=')
        TabOrder = 1
        TitleCaptions.Strings = (
          'Name'
          'IP Mask')
        ColWidths = (
          108
          683)
      end
    end
    object iconsPage: TTabSheet
      Caption = 'Icon masks'
      ImageIndex = -1
      DesignSize = (
        797
        385)
      object Label5: TLabel
        Left = 8
        Top = 32
        Width = 227
        Height = 14
        Caption = 'Each line is a file-mask associated with an icon'
        WordWrap = True
      end
      object Label6: TLabel
        Left = 272
        Top = 128
        Width = 76
        Height = 14
        Caption = 'Icon associated'
      end
      object iconMasksBox: TMemo
        Left = 8
        Top = 49
        Width = 225
        Height = 245
        Anchors = [akLeft, akTop, akBottom]
        TabOrder = 0
        OnChange = iconMasksBoxChange
      end
      object iconsBox: TComboBox
        Left = 272
        Top = 144
        Width = 76
        Height = 22
        Style = csOwnerDrawFixed
        TabOrder = 1
        OnChange = iconsBoxChange
        OnDrawItem = iconsBoxDrawItem
        OnDropDown = iconsBoxDropDown
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 414
    Width = 805
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      805
      35)
    object okBtn: TButton
      Left = 561
      Top = 6
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&OK'
      TabOrder = 0
      OnClick = okBtnClick
    end
    object applyBtn: TButton
      Left = 724
      Top = 6
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&Apply'
      TabOrder = 1
      OnClick = applyBtnClick
    end
    object cancelBtn: TButton
      Left = 643
      Top = 6
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = '&Cancel'
      TabOrder = 2
      OnClick = cancelBtnClick
    end
  end
end