dub project editor, expand items when needed

This commit is contained in:
Basile Burg 2015-09-25 03:26:24 +02:00
parent 2eca7e5e37
commit 2d06f1e035
2 changed files with 5 additions and 2 deletions

View File

@ -21,10 +21,10 @@ inherited CEDubProjectEditorWidget: TCEDubProjectEditorWidget
Height = 416 Height = 416
Top = 4 Top = 4
Width = 403 Width = 403
ActivePage = TabSheet2 ActivePage = TabSheet1
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
TabIndex = 1 TabIndex = 0
TabOrder = 0 TabOrder = 0
object TabSheet1: TTabSheet object TabSheet1: TTabSheet
Caption = 'Inspector' Caption = 'Inspector'

View File

@ -467,6 +467,9 @@ begin
node.SelectedIndex := 2; node.SelectedIndex := 2;
node.StateIndex := 2; node.StateIndex := 2;
end; end;
// first update or update cause by editor
if (not fNodeConfig.Expanded) and (not fNodeSources.Expanded) then
treeInspect.FullExpand;
treeInspect.EndUpdate; treeInspect.EndUpdate;
end; end;