From c4cf20839b41797671b9414a6284ddf9103e0616 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 3 Feb 2014 18:51:29 +0000
Subject: [PATCH] LCL: gtk2: fixed parameter type, bug #25670

git-svn-id: trunk@43869 -
---
 lcl/interfaces/gtk2/gtk2wsprivate.pp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/interfaces/gtk2/gtk2wsprivate.pp b/lcl/interfaces/gtk2/gtk2wsprivate.pp
index b26bafcd1e..6187e03bd0 100644
--- a/lcl/interfaces/gtk2/gtk2wsprivate.pp
+++ b/lcl/interfaces/gtk2/gtk2wsprivate.pp
@@ -250,7 +250,7 @@ type
   end;
 
 
-function GetWidgetWithWindow(const AHandle: THandle): PGtkWidget;
+function GetWidgetWithWindow(const AHandle: HWND): PGtkWidget;
 procedure SetWindowCursor(AWindow: PGdkWindow; ACursor: HCursor;
   ARecursive: Boolean; ASetDefault: Boolean);
 procedure SetCursorForWindowsWithInfo(AWindow: PGdkWindow; AInfo: PWidgetInfo;
@@ -471,7 +471,7 @@ end;
 
 // Helper functions
 
-function GetWidgetWithWindow(const AHandle: THandle): PGtkWidget;
+function GetWidgetWithWindow(const AHandle: HWND): PGtkWidget;
 var
   Children: PGList;
 begin