diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index 3285f65ff6..cd8bfc6e49 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -5669,6 +5669,7 @@ begin
   TempEditor:=FindSourceEditorWithPageIndex(PageIndex);
   if TempEditor=nil then exit;
   Visible:=true;
+  EndIncrementalFind;
   TempEditor.Close;
   TempEditor.Free;
   if Notebook.PageCount>1 then