From dc204837e6ee358ba8fc8f28be1e37cc2acdb775 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C5=BDeljan=20Rikalo?= <zeljko@lazarus-ide.org>
Date: Fri, 29 Apr 2022 16:33:28 +0200
Subject: [PATCH] Qt5: proper check for handle

---
 components/lclextensions/include/qt5/delphicompat.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/lclextensions/include/qt5/delphicompat.inc b/components/lclextensions/include/qt5/delphicompat.inc
index 5e2ae74316..dca193738e 100644
--- a/components/lclextensions/include/qt5/delphicompat.inc
+++ b/components/lclextensions/include/qt5/delphicompat.inc
@@ -203,7 +203,7 @@ begin
   FID := nIDEvent;
   FControl := FindControl(hWnd);
   FHandle := hWnd;
-  if hWnd <> 0 then
+  if QtWidgetSet.IsValidHandle(hWnd) then
   begin
     FWidgetHook := QObject_hook_create(TQtWidget(hWnd).TheObject);
     QObject_hook_hook_destroyed(FWidgetHook, @signalWidgetDestroyed);