From 4479f4f5d5e9ba8bbfa49349e2c73df7aed1344c Mon Sep 17 00:00:00 2001
From: Ansgar Becker <anse@heidisql.com>
Date: Sun, 8 Oct 2023 17:28:08 +0200
Subject: [PATCH] Fix crash "Cannot make a visible window modal" in
 actQueryFindReplaceExecute:8, found in uploaded reports.

---
 source/main.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/source/main.pas b/source/main.pas
index 1745081a..aa14633a 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -4692,6 +4692,8 @@ begin
   // Display search + replace dialog
   if not Assigned(FSearchReplaceDialog) then
     FSearchReplaceDialog := TfrmSearchReplace.Create(Self);
+  if FSearchReplaceDialog.Visible then
+    Exit;
   FSearchReplaceDialog.chkReplace.Checked := Sender = actQueryReplace;
   if (ActiveSynMemo(False) <> nil) or (ActiveGrid <> nil) then begin
     OldDataLocalNumberFormat := DataLocalNumberFormat;