From 015034e457d2758ba413b59dfdf9bef9741d0bda Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Wed, 16 Jan 2008 12:15:49 +0000
Subject: [PATCH] qt: dont use .Handle <> 0 comparison use HandleAllocated
 instead

git-svn-id: trunk@13778 -
---
 lcl/interfaces/qt/qtwsdialogs.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/interfaces/qt/qtwsdialogs.pp b/lcl/interfaces/qt/qtwsdialogs.pp
index 1c2552c05f..09bd87807b 100644
--- a/lcl/interfaces/qt/qtwsdialogs.pp
+++ b/lcl/interfaces/qt/qtwsdialogs.pp
@@ -164,7 +164,7 @@ end;
  ------------------------------------------------------------------------------}
 class procedure TQtWSCommonDialog.DestroyHandle(const ACommonDialog: TCommonDialog);
 begin
-  if ACommonDialog.Handle <> 0 then
+  if ACommonDialog.HandleAllocated then
     TQtDialog(ACommonDialog.Handle).Release;
 end;