object FoldersWindow: TFoldersWindow
  Left = 133
  Top = 84
  Width = 696
  Height = 480
  Caption = 'Folders'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Menu = MainMenu
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object LV: TMyListView
    Left = 0
    Top = 0
    Width = 688
    Height = 426
    Align = alClient
    Columns = <
      item
        Caption = 'Name'
        Width = 300
      end
      item
        Caption = 'File'
        Width = 200
      end>
    DragMode = dmAutomatic
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -17
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    GridLines = True
    HideSelection = False
    HotTrackStyles = []
    OwnerData = True
    OwnerDraw = True
    ReadOnly = True
    RowSelect = True
    ParentFont = False
    SmallImages = XnewsFrame.TaskBarImages
    TabOrder = 0
    ViewStyle = vsReport
    OnColumnClick = LVColumnClick
    OnData = LVData
    OnDataFind = LVDataFind
    OnDblClick = LVDblClick
    OnDrawItem = LVDrawItem
    OnEnter = LVEnter
    OnKeyPress = LVKeyPress
    OnKeyUp = LVKeyUp
    OnMouseUp = LVMouseUp
    SaveSettings.RegistryKey = 'Software\Xnews\Folders\Columns'
  end
  object MainMenu: TMainMenu
    Left = 96
    Top = 184
    object mnFolder: TMenuItem
      Caption = '&Folder'
      GroupIndex = 1
      object AddFolder1: TMenuItem
        Action = acfAdd
        Caption = 'Add'
      end
      object DeleteFolder1: TMenuItem
        Action = acfDel
        Caption = 'Delete'
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object RenameFolder1: TMenuItem
        Action = acfRename
        Caption = 'Rename'
      end
      object ChangeFile1: TMenuItem
        Action = acfChangeFile
      end
    end
  end
  object FActions: TActionList
    Left = 200
    Top = 192
    object acfAdd: TAction
      Category = 'Folders'
      Caption = 'Add Folder'
      ShortCut = 45
      OnExecute = acfAddExecute
    end
    object acfDel: TAction
      Category = 'Folders'
      Caption = 'Delete Folder'
      ShortCut = 46
      OnExecute = acfDelExecute
    end
    object acfRename: TAction
      Category = 'Folders'
      Caption = 'Rename Folder'
      ShortCut = 113
      OnExecute = acfRenameExecute
    end
    object acfChangeFile: TAction
      Category = 'Folders'
      Caption = 'Change File'
      ShortCut = 115
      OnExecute = acfChangeFileExecute
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'Mbx files|*.mbx|All files|*.*'
    FilterIndex = 0
    Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing]
    Left = 176
    Top = 312
  end
end