From a1121fb2ec979ae608925940884aec5e9dcee381 Mon Sep 17 00:00:00 2001
From: Loesje_ <Loesje_@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 14 Oct 2010 08:00:44 +0000
Subject: [PATCH]  * Implemented a way to pass a PGtkWidget to Gecko to draw
 the webpage on for Gtk2

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1349 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/geckoport/Components/GeckoChromeWindow.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/geckoport/Components/GeckoChromeWindow.pas b/components/geckoport/Components/GeckoChromeWindow.pas
index c40af8ae5..ec7fd6970 100755
--- a/components/geckoport/Components/GeckoChromeWindow.pas
+++ b/components/geckoport/Components/GeckoChromeWindow.pas
@@ -53,6 +53,7 @@ uses
   SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, CallbackInterfaces, nsXPCOM, nsTypes, nsXPCOM_std19
   {$IFDEF LCLCarbon}, CarbonPrivate {$ENDIF}
+  {$IFDEF LCLGtk2}, gtk2 {$ENDIF}
   {$IFDEF LCLCocoa}, CocoaAll, CocoaUtils, CocoaPrivate {$ENDIF};
 
 type
@@ -187,7 +188,9 @@ begin
 
    {$IFDEF LCLGtk}Result := Handle;{$ENDIF}  //Is Handle same as GTK Window?
 
-   {$IFDEF LCLGtk2}Result := Handle;{$ENDIF}  //Is Handle same as GTK Window?
+   {$IFDEF LCLGtk2}
+   Result := PtrInt(PGtkWindow(GeckoChromeForm.Handle)^.bin.child);
+   {$ENDIF}  //Is Handle same as GTK Window?
 end;
 
 procedure TGeckoChromeForm.InitWebBrowser;