diff --git a/lcl/interfaces/gtk/gtk1extra.inc b/lcl/interfaces/gtk/gtk1extra.inc
index 99bcddcec3..29597432c5 100644
--- a/lcl/interfaces/gtk/gtk1extra.inc
+++ b/lcl/interfaces/gtk/gtk1extra.inc
@@ -197,7 +197,7 @@ begin
 
   XGetWindowProperty(XDisplay, XWindow, _NET_WM_STATE,
              0, MaxInt, False, XA_ATOM, @atomtype, @format, @nitems,
-             @bytes_after, @state_array);
+             @bytes_after, gpointer(@state_array));
   if (atomtype = XA_ATOM) and (format = 32) and  (nitems > 0) then
   begin
     // Check to see if the window is already minimized...
diff --git a/lcl/interfaces/gtk/gtkdevicecontext.inc b/lcl/interfaces/gtk/gtkdevicecontext.inc
index b1e924ccc7..29a157245a 100644
--- a/lcl/interfaces/gtk/gtkdevicecontext.inc
+++ b/lcl/interfaces/gtk/gtkdevicecontext.inc
@@ -494,7 +494,7 @@ begin
   then begin
     // screen: ToDo: multiple desktops
     {$ifdef gtk1}
-    FDrawable := @gdk_root_parent;
+    FDrawable := PGDKDrawable(@gdk_root_parent);
     {$else}
     FDrawable := gdk_screen_get_root_window(gdk_screen_get_default);
     {$endif}
diff --git a/lcl/interfaces/gtk/gtkstdpixmaps.inc b/lcl/interfaces/gtk/gtkstdpixmaps.inc
index fccea54e7b..7ee16d46d3 100644
--- a/lcl/interfaces/gtk/gtkstdpixmaps.inc
+++ b/lcl/interfaces/gtk/gtkstdpixmaps.inc
@@ -53,7 +53,7 @@ const
   );
 
 var
-  PixmapArray: array[1..3] of PPgchar =
+  PixmapArray: array[1..3] of Pointer =
   (
 {1 - MDIMINBUTTON}
   @XPM_MDIMINBUTTON,
diff --git a/lcl/interfaces/gtk/gtkwidgetset.inc b/lcl/interfaces/gtk/gtkwidgetset.inc
index 0ea8227ac1..a279e670f7 100644
--- a/lcl/interfaces/gtk/gtkwidgetset.inc
+++ b/lcl/interfaces/gtk/gtkwidgetset.inc
@@ -2363,7 +2363,7 @@ var
   end;
   
 var
-  Width, Height, H, W, D: cardinal;
+  Width, Height, H, W, D: gint;
   Image: PGdkImage;
   R: TRect;
 begin
diff --git a/lcl/interfaces/gtk/gtkwinapi.inc b/lcl/interfaces/gtk/gtkwinapi.inc
index e82993dafd..fa155aae01 100644
--- a/lcl/interfaces/gtk/gtkwinapi.inc
+++ b/lcl/interfaces/gtk/gtkwinapi.inc
@@ -2043,8 +2043,8 @@ begin
 
     GetColorMask(Img, Msk, @ImgBits[0], @MskBits[0], W, H);
 
-    srcbitmap := gdk_bitmap_create_from_data(nil, @ImgBits[0], W, H);
-    mskbitmap := gdk_bitmap_create_from_data(nil, @MskBits[0], W, H);
+    srcbitmap := gdk_bitmap_create_from_data(nil, Pgchar(@ImgBits[0]), W, H);
+    mskbitmap := gdk_bitmap_create_from_data(nil, Pgchar(@MskBits[0]), W, H);
 
     // white
     fg.red := $FFFF;