object fmMain: TfmMain
  Left = 222
  Height = 442
  Top = 254
  Width = 932
  Caption = 'App'
  ClientHeight = 442
  ClientWidth = 932
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.5'
  object Panel1: TPanel
    Left = 0
    Height = 442
    Top = 0
    Width = 626
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel1'
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 632
    Height = 442
    Top = 0
    Width = 300
    Align = alRight
    BevelOuter = bvNone
    ClientHeight = 442
    ClientWidth = 300
    TabOrder = 1
    object bGettext: TButton
      Left = 0
      Height = 25
      Top = 400
      Width = 80
      Caption = 'Get text'
      OnClick = bGettextClick
      TabOrder = 0
    end
    object List: TShellListView
      Left = 0
      Height = 442
      Top = 0
      Width = 300
      Align = alClient
      Color = clWhite
      HideSelection = False
      ReadOnly = True
      RowSelect = True
      SortColumn = 0
      SortType = stText
      TabOrder = 1
      ViewStyle = vsSmallIcon
      OnClick = ListClick
      ObjectTypes = [otNonFolders]
    end
  end
  object Splitter1: TSplitter
    Left = 626
    Height = 442
    Top = 0
    Width = 6
    Align = alRight
    Beveled = True
    ResizeAnchor = akRight
  end
end