From c350840ac093603b2fba3335eef21af9282d17a5 Mon Sep 17 00:00:00 2001
From: zeljko <zeljko@lazarus-ide.org>
Date: Thu, 27 May 2010 21:04:44 +0000
Subject: [PATCH] Qt: fixed TQtHintWindow.setVisible() for non THintWindow
 classtypes. fixes #16551

git-svn-id: trunk@25713 -
---
 lcl/interfaces/qt/qtwidgets.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index cabff78bcd..76876af21e 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -11365,7 +11365,8 @@ var
   ScreenNumber: integer;
   W,H: integer;
 begin
-  if AVisible then
+  // must use ClassType comparision here since qt is buggy about hints.#16551
+  if AVisible and (LCLObject.ClassType = THintWindow) then
   begin
     R := getGeometry;
     W := R.Right - R.Left;