From 098a312ff0924cefaad6661de905b2a66fc7c696 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C5=BDeljan=20Rikalo?= <zeljko@lazarus-ide.org>
Date: Sun, 24 Sep 2023 17:33:35 +0200
Subject: [PATCH] Anchordocking: do not manage THintWindow. issue #40519

(cherry picked from commit 3a4dd50e93d962ac3d18571a8e21f729cbe4dd57)
---
 components/anchordocking/anchordocking.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/components/anchordocking/anchordocking.pas b/components/anchordocking/anchordocking.pas
index 6c5ef62dbf..5dfadaf4ba 100644
--- a/components/anchordocking/anchordocking.pas
+++ b/components/anchordocking/anchordocking.pas
@@ -2499,6 +2499,8 @@ end;
 
 procedure TAnchorDockMaster.ScreenFormAdded(Sender: TObject; Form: TCustomForm);
 begin
+  if Form is THintWindow then
+    exit;
   FFormStyles.AddForm(Form);
   Form.AddHandlerFirstShow(@FormFirstShow);
 end;