This commit is contained in:
Basile Burg 2016-07-15 04:27:16 +02:00
parent 078f9e9d06
commit c054723122
4 changed files with 8 additions and 7 deletions

View File

@ -35,7 +35,7 @@ type
constructor construct(event: TDubPropAddEvent; json: TJSONData);
end;
{ TCEDubProjectEditorWidget }
{ TCEDubProjectEditorWidget }
TCEDubProjectEditorWidget = class(TCEWidget, ICEProjectObserver)
btnAcceptProp: TSpeedButton;
btnAddProp: TSpeedButton;

View File

@ -52,9 +52,6 @@ inherited CEEditorWidget: TCEEditorWidget
inherited contextMenu: TPopupMenu
left = 24
top = 16
object MenuItem2: TMenuItem[0]
Caption = 'New Item1'
end
end
object macRecorder: TSynMacroRecorder[2]
RecordShortCut = 0

View File

@ -61,7 +61,6 @@ type
mnuedPrevCarea: TMenuItem;
mnuedLowcase: TMenuItem;
mnuedUpcase: TMenuItem;
MenuItem2: TMenuItem;
MenuItem3: TMenuItem;
MenuItem5: TMenuItem;
MenuItem6: TMenuItem;

View File

@ -679,8 +679,13 @@ begin
Tree.Selected := aRoot.Items[i];
Tree.Selected.Expand(false);
//
if str = aPath then break;
if dig(Tree.Selected) then break;
if str = aPath then
break
else if dig(Tree.Selected) then
begin
Tree.Selected.MakeVisible;
break;
end;
end;
end;
end;