diff --git a/applications/lazedit/main.pp b/applications/lazedit/main.pp
index 15bbf7ce4..f6a6bd656 100644
--- a/applications/lazedit/main.pp
+++ b/applications/lazedit/main.pp
@@ -2300,6 +2300,7 @@ begin
   Ed := NoteBook.CurrentEditor;
   if Assigned(Ed) then
   begin
+    if Ed.SelAvail and (Ed.BlockBegin.Y = Ed.BlockEnd.Y) then FindDialog.FindText := Ed.SelText;
     FindDialog.Execute;
   end;
 end;