object formAnalyze: TformAnalyze
  Left = 519
  Top = 272
  Width = 432
  Height = 461
  ActiveControl = btnAnalyze
  Caption = 'Analyze disk'
  Color = clBtnFace
  Constraints.MinHeight = 320
  Constraints.MinWidth = 350
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  DesignSize = (
    424
    427)
  PixelsPerInch = 96
  TextHeight = 13
  object btnCancel: TButton
    Left = 304
    Top = 398
    Width = 115
    Height = 25
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object btnDefragment: TButton
    Left = 184
    Top = 398
    Width = 115
    Height = 25
    Action = actDefragment
    Anchors = [akRight, akBottom]
    ModalResult = 1
    TabOrder = 1
  end
  object gbWorkspace: TGroupBox
    Left = 8
    Top = 8
    Width = 409
    Height = 383
    Anchors = [akLeft, akTop, akRight, akBottom]
    Caption = ' Parameters '
    TabOrder = 0
    DesignSize = (
      409
      383)
    object lblStatus: TLabel
      Left = 8
      Top = 366
      Width = 57
      Height = 13
      Anchors = [akLeft, akBottom]
      AutoSize = False
      Caption = 'Status:'
    end
    object lblStatusValue: TLabel
      Left = 64
      Top = 366
      Width = 337
      Height = 13
      Anchors = [akLeft, akBottom]
      AutoSize = False
      Caption = 'Not started'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblFound: TLabel
      Left = 8
      Top = 350
      Width = 33
      Height = 13
      Anchors = [akLeft, akBottom]
      Caption = 'Found:'
    end
    object lblFoundValue: TLabel
      Left = 64
      Top = 350
      Width = 9
      Height = 13
      Anchors = [akLeft, akBottom]
      Caption = '--'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblDisk: TLabel
      Left = 8
      Top = 24
      Width = 25
      Height = 13
      Caption = 'Path:'
    end
    object lblFragments: TLabel
      Left = 8
      Top = 64
      Width = 101
      Height = 13
      Caption = 'Number of fragments:'
    end
    object Bevel1: TBevel
      Left = 8
      Top = 112
      Width = 393
      Height = 2
      Anchors = [akLeft, akTop, akRight]
    end
    object lvFiles: TListView
      Left = 8
      Top = 152
      Width = 393
      Height = 191
      Anchors = [akLeft, akTop, akRight, akBottom]
      Checkboxes = True
      Columns = <
        item
          Caption = 'File'
          Width = 270
        end
        item
          Caption = 'Fragments'
          Width = 100
        end>
      MultiSelect = True
      OwnerData = True
      ReadOnly = True
      RowSelect = True
      PopupMenu = popupContextMenu
      StateImages = ImageList1
      TabOrder = 5
      ViewStyle = vsReport
      OnColumnClick = lvFilesColumnClick
      OnData = lvFilesData
      OnKeyDown = lvFilesKeyDown
      OnMouseDown = lvFilesMouseDown
    end
    object aniFind: TAnimate
      Left = 168
      Top = 195
      Width = 80
      Height = 50
      Color = clWhite
      CommonAVI = aviFindFolder
      ParentColor = False
      StopFrame = 29
      Visible = False
    end
    object btnStop: TButton
      Left = 296
      Top = 120
      Width = 99
      Height = 25
      Action = actStop
      Anchors = [akTop, akRight]
      TabOrder = 4
    end
    object btnAnalyze: TButton
      Left = 192
      Top = 120
      Width = 99
      Height = 25
      Action = actAnalyze
      Anchors = [akTop, akRight]
      TabOrder = 3
    end
    object edtPath: TEdit
      Left = 8
      Top = 40
      Width = 375
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      TabOrder = 0
      Text = 'C:\'
    end
    object seMinFragments: TSpinEdit
      Left = 8
      Top = 80
      Width = 105
      Height = 22
      MaxValue = 99999
      MinValue = 2
      TabOrder = 2
      Value = 30
    end
    object btnSelect: TButton
      Left = 384
      Top = 40
      Width = 17
      Height = 23
      Action = actSelectDir
      Anchors = [akTop, akRight]
      Caption = '...'
      TabOrder = 1
    end
  end
  object ActionManager1: TActionManager
    Left = 8
    Top = 392
    StyleName = 'XP Style'
    object actAnalyze: TAction
      Caption = 'Analyze'
      OnExecute = actAnalyzeExecute
    end
    object actDefragment: TAction
      Caption = 'Defragment'
      OnUpdate = actDefragmentUpdate
    end
    object actStop: TAction
      Caption = 'Stop'
      Enabled = False
      OnExecute = actStopExecute
    end
    object actUnselectAll: TAction
      Caption = 'Reset all'
      OnExecute = actUnselectAllExecute
    end
    object actSelectAll: TAction
      Caption = 'Check all'
      OnExecute = actSelectAllExecute
    end
    object actSelectDir: TAction
      Caption = 'Select'
      OnExecute = actSelectDirExecute
    end
    object actSelect: TAction
      Caption = 'Check'
      OnExecute = actSelectExecute
    end
    object actReset: TAction
      Caption = 'Reset'
      OnExecute = actResetExecute
    end
  end
  object popupContextMenu: TPopupMenu
    Left = 40
    Top = 392
    object Check1: TMenuItem
      Action = actSelect
    end
    object Reset1: TMenuItem
      Action = actReset
    end
    object Selectall1: TMenuItem
      Action = actSelectAll
    end
    object Unselectall1: TMenuItem
      Action = actUnselectAll
    end
  end
  object ImageList1: TImageList
    BkColor = clWhite
    Height = 14
    Width = 14
    Left = 80
    Top = 392
  end
end