paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 06:00:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fixed layout search result form

Browse Source 
git-svn-id: trunk@24077 -
This commit is contained in:
mattias 2010-03-18 00:23:21 +00:00
parent 4f4bb0755f
commit ddf90b8e51
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/searchresultview.lfm
View File

@ -80,7 +80,6 @@ object SearchResultsView: TSearchResultsView
Height = 27 Height = 27
Top = 2 Top = 2
Width = 348 Width = 348
Anchors = [akTop, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
OnKeyDown = SearchInListEditKeyDown OnKeyDown = SearchInListEditKeyDown
ParentShowHint = False ParentShowHint = False

2
ide/sourceeditor.pp
View File

@ -5942,7 +5942,7 @@ begin
ASearchForm.ResultsWindow:= ListIndex; ASearchForm.ResultsWindow:= ListIndex;
try try
ASearchForm.Show; ASearchForm.Show;
// update Window Menu, the OnIdle event does not occur when searching // update Window Menu, the OnIdle event does not occur while searching
MainIDEInterface.UpdateWindowMenu; MainIDEInterface.UpdateWindowMenu;
ASearchForm.DoSearch; ASearchForm.DoSearch;
except except