object frmSelectPathRange: TfrmSelectPathRange
  Left = 696
  Height = 307
  Top = 219
  Width = 362
  ChildSizing.LeftRightSpacing = 6
  ChildSizing.TopBottomSpacing = 6
  ChildSizing.HorizontalSpacing = 3
  ChildSizing.VerticalSpacing = 3
  ClientHeight = 307
  ClientWidth = 362
  OnCreate = FormCreate
  Position = poOwnerFormCenter
  SessionProperties = 'Left;Top;Width;rbFirstFromEnd.Checked;rbFirstFromStart.Checked'
  LCLVersion = '2.0.6.0'
  object lblSelectDirectories: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 6
    Height = 15
    Top = 6
    Width = 326
    Caption = '&Select the directories to insert (you may select more than one)'
    FocusControl = lbDirectories
    ParentColor = False
  end
  object ButtonPanel: TButtonPanel
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 6
    Height = 26
    Top = 275
    Width = 350
    Align = alNone
    Anchors = [akLeft, akRight, akBottom]
    OKButton.Name = 'OKButton'
    OKButton.Caption = '&OK'
    OKButton.DefaultCaption = False
    HelpButton.Name = 'HelpButton'
    HelpButton.DefaultCaption = True
    CloseButton.Name = 'CloseButton'
    CloseButton.DefaultCaption = True
    CancelButton.Name = 'CancelButton'
    CancelButton.Caption = '&Cancel'
    CancelButton.DefaultCaption = False
    TabOrder = 2
    ShowButtons = [pbOK, pbCancel]
    ShowBevel = False
  end
  object lblResult: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = lbDirectories
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = ButtonPanel
    Left = 6
    Height = 15
    Top = 254
    Width = 35
    Anchors = [akLeft, akBottom]
    Caption = 'Result:'
    ParentColor = False
  end
  object lblValueToReturn: TLabel
    AnchorSideLeft.Control = lblResult
    AnchorSideLeft.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = ButtonPanel
    Left = 44
    Height = 15
    Top = 254
    Width = 312
    Anchors = [akLeft, akRight, akBottom]
    AutoSize = False
    ParentColor = False
  end
  object lbDirectories: TListBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = lblSelectDirectories
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = pnlChoices
    AnchorSideBottom.Control = lblResult
    Left = 6
    Height = 227
    Top = 24
    Width = 247
    Anchors = [akTop, akLeft, akRight, akBottom]
    ItemHeight = 0
    MultiSelect = True
    OnSelectionChange = lbDirectoriesSelectionChange
    TabOrder = 0
  end
  object pnlChoices: TPanel
    AnchorSideTop.Control = lblSelectDirectories
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = lblResult
    Left = 256
    Height = 227
    Top = 24
    Width = 100
    Anchors = [akTop, akRight, akBottom]
    AutoSize = True
    BevelOuter = bvNone
    ChildSizing.VerticalSpacing = 2
    ClientHeight = 227
    ClientWidth = 100
    TabOrder = 1
    object gbCountFrom: TGroupBox
      AnchorSideLeft.Control = pnlChoices
      AnchorSideTop.Control = pnlChoices
      AnchorSideRight.Control = pnlChoices
      AnchorSideRight.Side = asrBottom
      Left = 0
      Height = 64
      Top = 0
      Width = 100
      Anchors = [akTop, akLeft, akRight]
      AutoSize = True
      Caption = 'Count from'
      ChildSizing.LeftRightSpacing = 6
      ChildSizing.HorizontalSpacing = 3
      ChildSizing.VerticalSpacing = 3
      ClientHeight = 44
      ClientWidth = 96
      TabOrder = 0
      object rbFirstFromStart: TRadioButton
        AnchorSideLeft.Control = gbCountFrom
        AnchorSideTop.Control = gbCountFrom
        Left = 6
        Height = 19
        Top = 0
        Width = 65
        Caption = 'The sta&rt'
        Checked = True
        OnChange = SomethingChange
        TabOrder = 0
        TabStop = True
      end
      object rbFirstFromEnd: TRadioButton
        AnchorSideLeft.Control = gbCountFrom
        AnchorSideTop.Control = rbFirstFromStart
        AnchorSideTop.Side = asrBottom
        Left = 6
        Height = 19
        Top = 22
        Width = 62
        BorderSpacing.Bottom = 3
        Caption = 'The en&d'
        OnChange = SomethingChange
        TabOrder = 1
      end
    end
    object edSeparator: TLabeledEdit
      AnchorSideLeft.Control = pnlChoices
      AnchorSideRight.Control = pnlChoices
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = pnlChoices
      AnchorSideBottom.Side = asrBottom
      Left = 0
      Height = 23
      Top = 204
      Width = 100
      Anchors = [akLeft, akRight, akBottom]
      Constraints.MinWidth = 100
      EditLabel.Height = 15
      EditLabel.Width = 100
      EditLabel.Caption = 'Sep&arator'
      EditLabel.ParentColor = False
      TabOrder = 1
      OnChange = SomethingChange
    end
  end
end
