Restore Esc functionality to stop finding (broken by ae83e7e1d: Found files can be deleted on the Find dialog )

Source commit: ad38e248663dfd38bc3c367a296e8806c88d8f8e

source/forms/FileFind.cpp

@@ -409,7 +409,10 @@ void __fastcall TFileFindDialog::CMDialogKey(TWMKeyDown & Message)
   // Moreover FormKeyDown is called when the the "esc" is pressed while drop down list is unrolled.
   if (Message.CharCode == VK_ESCAPE)
   {
-    Close();
+    if (!StopIfFinding())
+    {
+      Close();
+    }
     Message.Result = 1;
     return;
   }