From 0c15e9096e7acadb01e4a9c6613c1e4daefa9935 Mon Sep 17 00:00:00 2001 From: juha Date: Sat, 13 Jul 2013 21:21:07 +0000 Subject: [PATCH] IDE: Show directory hierarchy by default in project inspector git-svn-id: trunk@42080 - --- ide/projectinspector.pas | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/ide/projectinspector.pas b/ide/projectinspector.pas index 8e925b2f3a..2ba757f233 100644 --- a/ide/projectinspector.pas +++ b/ide/projectinspector.pas @@ -95,12 +95,12 @@ type TProjectInspectorForm = class(TForm) BtnPanel: TPanel; - DirectoryHierarchyButton: TSpeedButton; - FilterEdit: TTreeFilterEdit; OpenButton: TSpeedButton; + DirectoryHierarchyButton: TSpeedButton; + SortAlphabeticallyButton: TSpeedButton; + FilterEdit: TTreeFilterEdit; ItemsTreeView: TTreeView; ItemsPopupMenu: TPopupMenu; - SortAlphabeticallyButton: TSpeedButton; // toolbar ToolBar: TToolBar; // toolbuttons @@ -841,6 +841,8 @@ begin inherited Create(TheOwner); Name:=NonModalIDEWindowNames[nmiwProjectInspector]; Caption:=lisMenuProjectInspector; + FShowDirectoryHierarchy := True; + DirectoryHierarchyButton.Down := FShowDirectoryHierarchy; FSortAlphabetically := True; SortAlphabeticallyButton.Down := FSortAlphabetically; KeyPreview:=true;