From 17b5d197611ae9bfc15cb9c8fc49807a92f3c21c Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sun, 20 Sep 2009 22:13:40 +0000
Subject: [PATCH] gtk intf: TGtkWSDragImageList.BeginDrag:
 gdk_pixbuf_render_pixmap_and_mask creates the pixmap and mask itself

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

diff --git a/lcl/interfaces/gtk/gtkwscontrols.pp b/lcl/interfaces/gtk/gtkwscontrols.pp
index 166daa81ec..43c707ff24 100644
--- a/lcl/interfaces/gtk/gtkwscontrols.pp
+++ b/lcl/interfaces/gtk/gtkwscontrols.pp
@@ -990,8 +990,8 @@ begin
       end;
     gbPixbuf:
       begin
-        Pixmap := gdk_pixmap_new(nil, ABitmap.Width, ABitmap.Height, 24);
-        Mask := gdk_pixmap_new(nil, ABitmap.Width, ABitmap.Height, 1);
+        Pixmap := nil;
+        Mask := nil;
         gdk_pixbuf_render_pixmap_and_mask(GDIObject^.GDIPixbufObject, Pixmap, Mask, $80);
       end;
   end;