paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-24 15:39:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Remember the "Origin" setting in Search/Find dialog. Issue #32619

Browse Source 
git-svn-id: branches/fixes_1_8@56303 -
This commit is contained in:
mattias 2017-11-06 10:23:36 +00:00
parent 382860de61
commit 695ed820dd
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/sourceeditor.pp
View File

@ -3320,7 +3320,8 @@ end;
{------------------------------S T A R T F I N D-----------------------------} {------------------------------S T A R T F I N D-----------------------------}
procedure TSourceEditor.StartFindAndReplace(Replace:boolean); procedure TSourceEditor.StartFindAndReplace(Replace:boolean);
const const
SaveOptions = [ssoMatchCase,ssoWholeWord,ssoRegExpr,ssoRegExprMultiLine,ssoPrompt,ssoBackwards]; SaveOptions = [ssoMatchCase, ssoWholeWord, ssoRegExpr, ssoRegExprMultiLine,
ssoPrompt, ssoEntireScope, ssoBackwards];
var var
NewOptions: TSynSearchOptions; NewOptions: TSynSearchOptions;
ALeft,ATop:integer; ALeft,ATop:integer;
@ -3337,7 +3338,7 @@ begin
else else
NewOptions := NewOptions - [ssoReplace, ssoReplaceAll]; NewOptions := NewOptions - [ssoReplace, ssoReplaceAll];
NewOptions:=NewOptions-SaveOptions+InputHistoriesSO.FindOptions*SaveOptions NewOptions:=NewOptions-SaveOptions+InputHistoriesSO.FindOptions*SaveOptions
-[ssoSelectedOnly, ssoEntireScope]; -[ssoSelectedOnly];
// Fill in history items // Fill in history items
LazFindReplaceDialog.TextToFindComboBox.Items.Assign(InputHistoriesSO.FindHistory); LazFindReplaceDialog.TextToFindComboBox.Items.Assign(InputHistoriesSO.FindHistory);