1object PackageEditorForm: TPackageEditorForm 2 Left = 340 3 Height = 455 4 Top = 245 5 Width = 464 6 AllowDropFiles = True 7 BorderIcons = [biSystemMenu] 8 Caption = 'PackageEditorForm' 9 ClientHeight = 455 10 ClientWidth = 464 11 Constraints.MinHeight = 300 12 Constraints.MinWidth = 400 13 KeyPreview = True 14 OnClose = PackageEditorFormClose 15 OnCloseQuery = PackageEditorFormCloseQuery 16 OnCreate = FormCreate 17 OnDestroy = FormDestroy 18 OnDropFiles = FormDropFiles 19 LCLVersion = '2.1.0.0' 20 object ToolBar: TToolBar 21 Left = 0 22 Height = 48 23 Top = 0 24 Width = 464 25 AutoSize = True 26 ButtonHeight = 46 27 ButtonWidth = 23 28 ParentFont = False 29 ShowCaptions = True 30 TabOrder = 0 31 end 32 object PropsGroupBox: TGroupBox 33 Left = 0 34 Height = 216 35 Top = 216 36 Width = 464 37 Align = alBottom 38 Caption = 'PropsGroupBox' 39 ClientHeight = 186 40 ClientWidth = 460 41 ParentFont = False 42 TabOrder = 3 43 object PropsPageControl: TPageControl 44 Left = 0 45 Height = 186 46 Top = 0 47 Width = 460 48 ActivePage = CommonOptionsTabSheet 49 Align = alClient 50 ParentFont = False 51 ShowTabs = False 52 TabIndex = 0 53 TabOrder = 0 54 object CommonOptionsTabSheet: TTabSheet 55 Caption = 'Common' 56 ParentFont = False 57 end 58 end 59 end 60 object StatusBar: TStatusBar 61 Left = 0 62 Height = 23 63 Top = 432 64 Width = 464 65 Panels = <> 66 ParentFont = False 67 end 68 object Splitter1: TSplitter 69 Cursor = crVSplit 70 Left = 0 71 Height = 5 72 Top = 211 73 Width = 464 74 Align = alBottom 75 ResizeAnchor = akBottom 76 end 77 object FilterPanel: TPanel 78 Left = 0 79 Height = 28 80 Top = 48 81 Width = 464 82 Align = alTop 83 BevelOuter = bvNone 84 ClientHeight = 28 85 ClientWidth = 464 86 ParentFont = False 87 TabOrder = 1 88 object DirectoryHierarchyButton: TSpeedButton 89 AnchorSideLeft.Control = OpenButton 90 AnchorSideLeft.Side = asrBottom 91 AnchorSideTop.Control = OpenButton 92 AnchorSideTop.Side = asrCenter 93 AnchorSideBottom.Side = asrBottom 94 Left = 39 95 Height = 25 96 Top = 2 97 Width = 25 98 AllowAllUp = True 99 Anchors = [akTop, akLeft, akBottom] 100 AutoSize = True 101 BorderSpacing.Left = 11 102 Constraints.MinHeight = 25 103 Constraints.MinWidth = 25 104 GroupIndex = 1 105 OnClick = DirectoryHierarchyButtonClick 106 ShowHint = True 107 ParentFont = False 108 ParentShowHint = False 109 end 110 object SortAlphabeticallyButton: TSpeedButton 111 AnchorSideLeft.Control = DirectoryHierarchyButton 112 AnchorSideLeft.Side = asrBottom 113 AnchorSideTop.Control = OpenButton 114 AnchorSideTop.Side = asrCenter 115 AnchorSideBottom.Side = asrBottom 116 Left = 65 117 Height = 25 118 Top = 2 119 Width = 25 120 AllowAllUp = True 121 AutoSize = True 122 BorderSpacing.Left = 1 123 Constraints.MinHeight = 25 124 Constraints.MinWidth = 25 125 GroupIndex = 2 126 OnClick = SortAlphabeticallyButtonClick 127 ShowHint = True 128 ParentFont = False 129 ParentShowHint = False 130 end 131 object FilterEdit: TTreeFilterEdit 132 AnchorSideLeft.Control = MoveDownBtn 133 AnchorSideLeft.Side = asrBottom 134 AnchorSideTop.Control = SortAlphabeticallyButton 135 AnchorSideTop.Side = asrCenter 136 AnchorSideRight.Side = asrBottom 137 Left = 163 138 Height = 32 139 Top = -2 140 Width = 300 141 ButtonWidth = 23 142 Anchors = [akTop, akLeft, akRight] 143 BorderSpacing.Left = 11 144 NumGlyphs = 1 145 MaxLength = 0 146 ParentFont = False 147 TabOrder = 0 148 OnKeyDown = FilterEditKeyDown 149 FilteredTreeview = ItemsTreeView 150 end 151 object OpenButton: TSpeedButton 152 AnchorSideLeft.Control = FilterPanel 153 AnchorSideTop.Control = FilterPanel 154 AnchorSideTop.Side = asrCenter 155 AnchorSideBottom.Side = asrBottom 156 Left = 3 157 Height = 25 158 Top = 2 159 Width = 25 160 AllowAllUp = True 161 Anchors = [akTop, akLeft, akBottom] 162 AutoSize = True 163 BorderSpacing.Left = 3 164 Constraints.MinHeight = 25 165 Constraints.MinWidth = 25 166 OnClick = OpenButtonClick 167 ShowHint = True 168 ParentFont = False 169 ParentShowHint = False 170 end 171 object MoveUpBtn: TSpeedButton 172 AnchorSideLeft.Control = SortAlphabeticallyButton 173 AnchorSideLeft.Side = asrBottom 174 AnchorSideTop.Control = OpenButton 175 AnchorSideTop.Side = asrCenter 176 Left = 101 177 Height = 26 178 Top = 1 179 Width = 25 180 BorderSpacing.Left = 11 181 Constraints.MinHeight = 25 182 Constraints.MinWidth = 25 183 Enabled = False 184 OnClick = MoveUpBtnClick 185 ShowHint = True 186 ParentFont = False 187 ParentShowHint = False 188 end 189 object MoveDownBtn: TSpeedButton 190 AnchorSideLeft.Control = MoveUpBtn 191 AnchorSideLeft.Side = asrBottom 192 AnchorSideTop.Control = OpenButton 193 AnchorSideTop.Side = asrCenter 194 Left = 127 195 Height = 26 196 Top = 1 197 Width = 25 198 BorderSpacing.Left = 1 199 Constraints.MinHeight = 25 200 Constraints.MinWidth = 25 201 Enabled = False 202 OnClick = MoveDownBtnClick 203 ShowHint = True 204 ParentFont = False 205 ParentShowHint = False 206 end 207 end 208 object ItemsTreeView: TTreeView 209 Left = 0 210 Height = 134 211 Top = 77 212 Width = 464 213 Align = alClient 214 BorderSpacing.Top = 1 215 DragMode = dmAutomatic 216 MultiSelect = True 217 ParentFont = False 218 PopupMenu = ItemsPopupMenu 219 ReadOnly = True 220 RightClickSelect = True 221 TabOrder = 2 222 OnAdvancedCustomDrawItem = ItemsTreeViewAdvancedCustomDrawItem 223 OnDblClick = ItemsTreeViewDblClick 224 OnDragDrop = ItemsTreeViewDragDrop 225 OnDragOver = ItemsTreeViewDragOver 226 OnKeyDown = ItemsTreeViewKeyDown 227 OnSelectionChanged = ItemsTreeViewSelectionChanged 228 Options = [tvoAllowMultiselect, tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw] 229 end 230 object ItemsPopupMenu: TPopupMenu 231 OnPopup = ItemsPopupMenuPopup 232 Left = 180 233 Top = 10 234 end 235 object UsePopupMenu: TPopupMenu 236 OnPopup = UsePopupMenuPopup 237 Left = 70 238 Top = 10 239 end 240 object MorePopupMenu: TPopupMenu 241 OnPopup = MorePopupMenuPopup 242 Left = 300 243 Top = 10 244 end 245 object AddPopupMenu: TPopupMenu 246 Left = 120 247 Top = 10 248 object mnuAddDiskFile: TMenuItem 249 Caption = 'Add file...' 250 Default = True 251 OnClick = mnuAddDiskFileClick 252 end 253 object MenuItem1: TMenuItem 254 Caption = '-' 255 end 256 object mnuAddNewFile: TMenuItem 257 Caption = 'New file of type...' 258 OnClick = mnuAddNewFileClick 259 end 260 object mnuAddNewComp: TMenuItem 261 Caption = 'New component...' 262 OnClick = mnuAddNewCompClick 263 end 264 object mnuAddNewReqr: TMenuItem 265 Caption = 'New requirement...' 266 OnClick = mnuAddNewReqrClick 267 end 268 object mnuAddFPMakeReq: TMenuItem 269 Caption = 'New FPMake requirement...' 270 OnClick = mnuAddFPMakeReqClick 271 end 272 end 273end 274