lazarus/ide/projectinspector.lfm

object ProjectInspectorForm: TProjectInspectorForm
  Left = 670
  Height = 456
  Top = 134
  Width = 299
  ActiveControl = ItemsTreeView
  AllowDropFiles = True
  Caption = 'ProjectInspectorForm'
  ClientHeight = 456
  ClientWidth = 299
  OnDropFiles = FormDropFiles
  LCLVersion = '1.5'
  object ItemsTreeView: TTreeView
    Left = 0
    Height = 378
    Top = 78
    Width = 299
    Align = alClient
    Anchors = [akTop, akLeft, akBottom]
    BorderSpacing.Top = 2
    DefaultItemHeight = 18
    DragMode = dmAutomatic
    MultiSelect = True
    PopupMenu = ItemsPopupMenu
    ReadOnly = True
    RightClickSelect = True
    TabOrder = 0
    OnAdvancedCustomDrawItem = ItemsTreeViewAdvancedCustomDrawItem
    OnDblClick = ItemsTreeViewDblClick
    OnDragDrop = ItemsTreeViewDragDrop
    OnDragOver = ItemsTreeViewDragOver
    OnKeyDown = ItemsTreeViewKeyDown
    OnSelectionChanged = ItemsTreeViewSelectionChanged
    Options = [tvoAllowMultiselect, tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
  end
  object BtnPanel: TPanel
    Left = 0
    Height = 28
    Top = 48
    Width = 299
    Align = alTop
    BevelOuter = bvNone
    ClientHeight = 28
    ClientWidth = 299
    TabOrder = 1
    object OpenButton: TSpeedButton
      AnchorSideLeft.Control = BtnPanel
      AnchorSideTop.Control = BtnPanel
      AnchorSideTop.Side = asrCenter
      Left = 2
      Height = 25
      Top = 2
      Width = 25
      Align = alLeft
      AllowAllUp = True
      AutoSize = True
      BorderSpacing.Around = 2
      Constraints.MinHeight = 25
      Constraints.MinWidth = 25
      OnClick = OpenButtonClick
      ShowHint = True
      ParentShowHint = False
    end
    object DirectoryHierarchyButton: TSpeedButton
      AnchorSideLeft.Control = OpenButton
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = OpenButton
      AnchorSideTop.Side = asrCenter
      Left = 40
      Height = 25
      Top = 2
      Width = 25
      AllowAllUp = True
      AutoSize = True
      BorderSpacing.Left = 11
      BorderSpacing.Around = 2
      Constraints.MinHeight = 25
      Constraints.MinWidth = 25
      GroupIndex = 1
      OnClick = DirectoryHierarchyButtonClick
      ShowHint = True
      ParentShowHint = False
    end
    object SortAlphabeticallyButton: TSpeedButton
      AnchorSideLeft.Control = DirectoryHierarchyButton
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = OpenButton
      AnchorSideTop.Side = asrCenter
      Left = 67
      Height = 25
      Top = 2
      Width = 25
      AllowAllUp = True
      AutoSize = True
      BorderSpacing.Around = 2
      Constraints.MinHeight = 25
      Constraints.MinWidth = 25
      GroupIndex = 2
      OnClick = SortAlphabeticallyButtonClick
      ShowHint = True
      ParentShowHint = False
    end
    object FilterEdit: TTreeFilterEdit
      AnchorSideLeft.Control = SortAlphabeticallyButton
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = SortAlphabeticallyButton
      AnchorSideTop.Side = asrCenter
      Left = 95
      Height = 23
      Top = 3
      Width = 201
      UseFormActivate = True
      ButtonWidth = 23
      NumGlyphs = 1
      Anchors = [akTop, akLeft, akRight]
      BorderSpacing.Left = 3
      MaxLength = 0
      ParentFont = False
      TabOrder = 0
      OnKeyDown = FilterEditKeyDown
      FilteredTreeview = ItemsTreeView
    end
  end
  object ToolBar: TToolBar
    Left = 0
    Height = 48
    Top = 0
    Width = 299
    AutoSize = True
    ButtonHeight = 46
    ShowCaptions = True
    TabOrder = 2
  end
  object ItemsPopupMenu: TPopupMenu
    OnPopup = ItemsPopupMenuPopup
    left = 72
    top = 112
    object MenuItem1: TMenuItem
      Caption = 'New Item1'
    end
  end
  object AddPopupMenu: TPopupMenu
    left = 74
    top = 163
    object mnuAddDiskFile: TMenuItem
      Caption = 'Add file from disk'
      Default = True
      OnClick = mnuAddBitBtnClick
    end
    object MenuItem2: TMenuItem
      Caption = '-'
    end
    object mnuAddDiskFiles: TMenuItem
      Caption = 'Add files'
      OnClick = mnuAddDiskFilesClick
    end
    object mnuAddEditorFiles: TMenuItem
      Caption = 'Add editor files'
      OnClick = mnuAddEditorFilesClick
    end
    object mnuAddReq: TMenuItem
      Caption = 'Add requirement'
      OnClick = mnuAddReqClick
    end
  end
end