LazEdit: fix not searching backwards.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7253 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
lazarus-bart
2020-01-09 17:12:07 +00:00
parent 1afe4ef421
commit 3376369e66

View File

@ -2432,7 +2432,7 @@ begin
FindText := Dlg.FindText; FindText := Dlg.FindText;
if Ed.SearchReplace(FindText,'',FindOptions) = 0 then if Ed.SearchReplace(FindText,'',ReplaceOptions) = 0 then
ShowError(Format(vTranslations.msgTextNotFound,[FindText])); ShowError(Format(vTranslations.msgTextNotFound,[FindText]));
end; end;