IDE: Respond to Enter in SearchResultsView when focus on FilterEdit. Issue #28277, patch from Ondrej Pokorny.

git-svn-id: trunk@49317 -
This commit is contained in:
juha 2015-06-12 09:35:06 +00:00
parent fa041aeae9
commit 5572c8e982
2 changed files with 5 additions and 1 deletions

View File

@ -75,7 +75,6 @@ object SearchResultsView: TSearchResultsView
NumGlyphs = 1
BorderSpacing.Left = 6
MaxLength = 0
ParentFont = False
TabOrder = 0
OnChange = SearchInListChange
end

View File

@ -444,6 +444,11 @@ begin
Node.Expand(False);
end;
Key := #0;
end else
if Key = Char(VK_RETURN) then //SearchInListEdit passes only OnPress through
begin
Key := #0;
FOnSelectionChanged(Self);
end;
end;