From a927d61e735a08458a7fbf4c0276335371ec93f4 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Sat, 2 May 2009 12:07:24 +0000
Subject: [PATCH] ide: reanchor unit dependencies dialog

git-svn-id: trunk@19763 -
---
 ide/unitdependencies.lfm | 37 ++++++++++++++++++----------------
 ide/unitdependencies.lrs | 43 ++++++++++++++++++++--------------------
 ide/unitdependencies.pas |  2 --
 3 files changed, 42 insertions(+), 40 deletions(-)

diff --git a/ide/unitdependencies.lfm b/ide/unitdependencies.lfm
index ca3a22c25c..792c65fbe2 100644
--- a/ide/unitdependencies.lfm
+++ b/ide/unitdependencies.lfm
@@ -1,7 +1,7 @@
 object UnitDependenciesView: TUnitDependenciesView
-  Left = 318
+  Left = 560
   Height = 300
-  Top = 355
+  Top = 359
   Width = 400
   ActiveControl = UnitHistoryList
   Caption = 'UnitDependenciesView'
@@ -24,7 +24,7 @@ object UnitDependenciesView: TUnitDependenciesView
     ShowHint = True
     TabOrder = 0
     object ShowProjectButton: TToolButton
-      Left = 216
+      Left = 167
       Top = 2
       Caption = 'ShowProjectButton'
       OnClick = ShowProjectButtonClick
@@ -36,7 +36,7 @@ object UnitDependenciesView: TUnitDependenciesView
       OnClick = SelectUnitButtonClick
     end
     object RefreshButton: TToolButton
-      Left = 118
+      Left = 89
       Top = 2
       Caption = 'RefreshButton'
       OnClick = RefreshButtonClick
@@ -44,43 +44,46 @@ object UnitDependenciesView: TUnitDependenciesView
   end
   object UnitHistoryList: TComboBox
     Left = 6
-    Height = 29
+    Height = 21
     Top = 54
     Width = 388
     Align = alTop
     AutoComplete = False
     BorderSpacing.Around = 6
-    ItemHeight = 0
+    ItemHeight = 13
     ItemWidth = 0
     OnEditingDone = UnitHistoryListEditingDone
     TabOrder = 1
     Text = 'UnitHistoryList'
   end
   object CloseButton: TBitBtn
+    AnchorSideRight.Control = Owner
+    AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
-    Left = 317
-    Height = 36
-    Top = 258
-    Width = 74
+    Left = 319
+    Height = 26
+    Top = 268
+    Width = 75
     Anchors = [akRight, akBottom]
     AutoSize = True
-    BorderSpacing.Bottom = 6
+    BorderSpacing.Around = 6
     Caption = '&Close'
+    Constraints.MinWidth = 75
     Kind = bkClose
     NumGlyphs = 0
     TabOrder = 2
   end
   object UnitTreeView: TTreeView
     AnchorSideBottom.Control = CloseButton
-    Left = 0
-    Height = 163
-    Top = 89
-    Width = 400
+    Left = 6
+    Height = 181
+    Top = 81
+    Width = 388
     Align = alTop
     Anchors = [akTop, akLeft, akRight, akBottom]
-    BorderSpacing.Bottom = 6
-    DefaultItemHeight = 19
+    BorderSpacing.Around = 6
+    DefaultItemHeight = 15
     ReadOnly = True
     TabOrder = 3
     OnAdvancedCustomDrawItem = UnitTreeViewAdvancedCustomDrawItem
diff --git a/ide/unitdependencies.lrs b/ide/unitdependencies.lrs
index a84c236987..ecd46cd2fe 100644
--- a/ide/unitdependencies.lrs
+++ b/ide/unitdependencies.lrs
@@ -1,35 +1,36 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TUnitDependenciesView','FORMDATA',[
-  'TPF0'#21'TUnitDependenciesView'#20'UnitDependenciesView'#4'Left'#3'>'#1#6'He'
-  +'ight'#3','#1#3'Top'#3'c'#1#5'Width'#3#144#1#13'ActiveControl'#7#15'UnitHist'
+  'TPF0'#21'TUnitDependenciesView'#20'UnitDependenciesView'#4'Left'#3'0'#2#6'He'
+  +'ight'#3','#1#3'Top'#3'g'#1#5'Width'#3#144#1#13'ActiveControl'#7#15'UnitHist'
   +'oryList'#7'Caption'#6#20'UnitDependenciesView'#12'ClientHeight'#3','#1#11'C'
   +'lientWidth'#3#144#1#10'KeyPreview'#9#7'OnClose'#7#25'UnitDependenciesViewCl'
   +'ose'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#8'TToolB'
   +'ar'#7'ToolBar'#4'Left'#2#0#6'Height'#2'0'#3'Top'#2#0#5'Width'#3#144#1#12'Bu'
   +'ttonHeight'#2'.'#11'ButtonWidth'#2'/'#7'Caption'#6#7'ToolBar'#14'ParentShow'
   +'Hint'#8#12'ShowCaptions'#9#8'ShowHint'#9#8'TabOrder'#2#0#0#11'TToolButton'
-  +#17'ShowProjectButton'#4'Left'#3#216#0#3'Top'#2#2#7'Caption'#6#17'ShowProjec'
+  +#17'ShowProjectButton'#4'Left'#3#167#0#3'Top'#2#2#7'Caption'#6#17'ShowProjec'
   +'tButton'#7'OnClick'#7#22'ShowProjectButtonClick'#0#0#11'TToolButton'#16'Sel'
   +'ectUnitButton'#4'Left'#2#1#3'Top'#2#2#7'Caption'#6#16'SelectUnitButton'#7'O'
   +'nClick'#7#21'SelectUnitButtonClick'#0#0#11'TToolButton'#13'RefreshButton'#4
-  +'Left'#2'v'#3'Top'#2#2#7'Caption'#6#13'RefreshButton'#7'OnClick'#7#18'Refres'
+  +'Left'#2'Y'#3'Top'#2#2#7'Caption'#6#13'RefreshButton'#7'OnClick'#7#18'Refres'
   +'hButtonClick'#0#0#0#9'TComboBox'#15'UnitHistoryList'#4'Left'#2#6#6'Height'#2
-  +#29#3'Top'#2'6'#5'Width'#3#132#1#5'Align'#7#5'alTop'#12'AutoComplete'#8#20'B'
-  +'orderSpacing.Around'#2#6#10'ItemHeight'#2#0#9'ItemWidth'#2#0#13'OnEditingDo'
-  +'ne'#7#26'UnitHistoryListEditingDone'#8'TabOrder'#2#1#4'Text'#6#15'UnitHisto'
-  +'ryList'#0#0#7'TBitBtn'#11'CloseButton'#24'AnchorSideBottom.Control'#7#5'Own'
-  +'er'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'='#1#6'Height'#2'$'#3
-  +'Top'#3#2#1#5'Width'#2'J'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'
-  +#9#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#6'&Close'#4'Kind'#7#7'bkClose'#9
-  +'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#9'TTreeView'#12'UnitTreeView'#24'AnchorS'
-  +'ideBottom.Control'#7#11'CloseButton'#4'Left'#2#0#6'Height'#3#163#0#3'Top'#2
-  +'Y'#5'Width'#3#144#1#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#7
-  +'akRight'#8'akBottom'#0#20'BorderSpacing.Bottom'#2#6#17'DefaultItemHeight'#2
-  +#19#8'ReadOnly'#9#8'TabOrder'#2#3#24'OnAdvancedCustomDrawItem'#7'"UnitTreeVi'
-  +'ewAdvancedCustomDrawItem'#12'OnCollapsing'#7#22'UnitTreeViewCollapsing'#11
-  +'OnExpanding'#7#21'UnitTreeViewExpanding'#11'OnMouseDown'#7#21'UnitTreeViewM'
-  +'ouseDown'#7'Options'#11#17'tvoAutoItemHeight'#16'tvoHideSelection'#21'tvoKe'
-  +'epCollapsedNodes'#11'tvoReadOnly'#14'tvoShowButtons'#12'tvoShowLines'#11'tv'
-  +'oShowRoot'#11'tvoToolTips'#0#0#0#0
+  +#21#3'Top'#2'6'#5'Width'#3#132#1#5'Align'#7#5'alTop'#12'AutoComplete'#8#20'B'
+  +'orderSpacing.Around'#2#6#10'ItemHeight'#2#13#9'ItemWidth'#2#0#13'OnEditingD'
+  +'one'#7#26'UnitHistoryListEditingDone'#8'TabOrder'#2#1#4'Text'#6#15'UnitHist'
+  +'oryList'#0#0#7'TBitBtn'#11'CloseButton'#23'AnchorSideRight.Control'#7#5'Own'
+  +'er'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5
+  +'Owner'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'?'#1#6'Height'#2
+  +#26#3'Top'#3#12#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'Aut'
+  +'oSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#6'&Close'#20'Constraints'
+  +'.MinWidth'#2'K'#4'Kind'#7#7'bkClose'#9'NumGlyphs'#2#0#8'TabOrder'#2#2#0#0#9
+  +'TTreeView'#12'UnitTreeView'#24'AnchorSideBottom.Control'#7#11'CloseButton'#4
+  +'Left'#2#6#6'Height'#3#181#0#3'Top'#2'Q'#5'Width'#3#132#1#5'Align'#7#5'alTop'
+  +#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20'BorderSpacing.'
+  +'Around'#2#6#17'DefaultItemHeight'#2#15#8'ReadOnly'#9#8'TabOrder'#2#3#24'OnA'
+  +'dvancedCustomDrawItem'#7'"UnitTreeViewAdvancedCustomDrawItem'#12'OnCollapsi'
+  +'ng'#7#22'UnitTreeViewCollapsing'#11'OnExpanding'#7#21'UnitTreeViewExpanding'
+  +#11'OnMouseDown'#7#21'UnitTreeViewMouseDown'#7'Options'#11#17'tvoAutoItemHei'
+  +'ght'#16'tvoHideSelection'#21'tvoKeepCollapsedNodes'#11'tvoReadOnly'#14'tvoS'
+  +'howButtons'#12'tvoShowLines'#11'tvoShowRoot'#11'tvoToolTips'#0#0#0#0
 ]);
diff --git a/ide/unitdependencies.pas b/ide/unitdependencies.pas
index 4e79af30e0..6111061c74 100644
--- a/ide/unitdependencies.pas
+++ b/ide/unitdependencies.pas
@@ -438,8 +438,6 @@ begin
   ShowProjectButton.ImageIndex := IDEImages.LoadImage(16, 'item_project');
   SelectUnitButton.ImageIndex := IDEImages.LoadImage(16, 'laz_open');
   RefreshButton.ImageIndex := IDEImages.LoadImage(16, 'laz_refresh');
-  CloseButton.LoadGlyphFromLazarusResource('btn_close');
-
 end;
 
 destructor TUnitDependenciesView.Destroy;