object FormMain: TFormMain
  Left = 214
  Top = 128
  Width = 544
  Height = 399
  Caption = 'File Manager Example'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object StatusPanel: TPanel
    Left = 0
    Top = 306
    Width = 536
    Height = 41
    Align = alBottom
    TabOrder = 0
    object DirectoryPanel: TPanel
      Left = 1
      Top = 1
      Width = 320
      Height = 39
      Align = alLeft
      BevelInner = bvLowered
      TabOrder = 0
    end
    object FilePanel: TPanel
      Left = 321
      Top = 1
      Width = 214
      Height = 39
      Align = alClient
      BevelInner = bvLowered
      TabOrder = 1
      object Floppy: TImage
        Left = 8
        Top = 16
        Width = 16
        Height = 9
        AutoSize = True
        Picture.Data = {<image000.bmp>}
        Visible = False
      end
      object Fixed: TImage
        Left = 32
        Top = 16
        Width = 16
        Height = 9
        AutoSize = True
        Picture.Data = {<image001.bmp>}
        Visible = False
      end
      object Network: TImage
        Left = 56
        Top = 16
        Width = 16
        Height = 9
        AutoSize = True
        Picture.Data = {<image002.bmp>}
        Visible = False
      end
    end
  end
  object DriveTabSet: TTabSet
    Left = 0
    Top = 285
    Width = 536
    Height = 21
    Align = alBottom
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = DriveTabSetClick
    OnDrawTab = DriveTabSetDrawTab
    OnMeasureTab = DriveTabSetMeasureTab
  end
  object FileList: TFileListBox
    Left = 193
    Top = 0
    Width = 343
    Height = 285
    Align = alClient
    FileType = [ftReadOnly, ftArchive, ftNormal]
    ItemHeight = 16
    ShowGlyphs = True
    TabOrder = 3
    OnChange = FileListChange
    OnDblClick = FileListDblClick
    OnEndDrag = FileListEndDrag
    OnMouseDown = FileListMouseDown
  end
  object DirectoryOutline: TDirectoryOutline
    Left = 0
    Top = 0
    Width = 193
    Height = 285
    TabStop = True
    OnChange = DirectoryOutlineChange
    Align = alLeft
    ItemHeight = 13
    OnDragDrop = DirectoryOutlineDragDrop
    OnDragOver = DirectoryOutlineDragOver
    Options = [ooDrawFocusRect, ooStretchBitmaps]
    ParentColor = False
    PictureLeaf.Data = {<image003.  BM      6  (   >}