diff --git a/ide/searchresultview.lfm b/ide/searchresultview.lfm index 07f037d6fe..8717063b6b 100644 --- a/ide/searchresultview.lfm +++ b/ide/searchresultview.lfm @@ -75,7 +75,6 @@ object SearchResultsView: TSearchResultsView NumGlyphs = 1 BorderSpacing.Left = 6 MaxLength = 0 - ParentFont = False TabOrder = 0 OnChange = SearchInListChange end diff --git a/ide/searchresultview.pp b/ide/searchresultview.pp index 71b95b45e3..6d720b21de 100644 --- a/ide/searchresultview.pp +++ b/ide/searchresultview.pp @@ -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;