From bdf67e7160744891084c5f7b1e520a412e72bafe Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 13 Feb 2015 07:49:04 +0000
Subject: [PATCH] LCL: less hints

git-svn-id: trunk@47726 -
---
 lcl/interfaces/gtk2/gtk2winapi.inc | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lcl/interfaces/gtk2/gtk2winapi.inc b/lcl/interfaces/gtk2/gtk2winapi.inc
index e7637c504e..e3715808dc 100644
--- a/lcl/interfaces/gtk2/gtk2winapi.inc
+++ b/lcl/interfaces/gtk2/gtk2winapi.inc
@@ -7044,9 +7044,9 @@ begin
   Result := False;
   if not IsValidGDIObject(RGN) then
     exit;
-  if (PGdiObject(RGN)^.GDIBitmapObject <> nil) or
-    (PGdiObject(RGN)^.GDIPixbufObject <> nil) or
-    (PGdiObject(RGN)^.GDIPixmapObject.Image <> nil) then
+  if ({%H-}PGdiObject(RGN)^.GDIBitmapObject <> nil) or
+    ({%H-}PGdiObject(RGN)^.GDIPixbufObject <> nil) or
+    ({%H-}PGdiObject(RGN)^.GDIPixmapObject.Image <> nil) then
   begin
     // issue #27080
     Result := False;