diff --git a/lcl/interfaces/gtk2/gtk2devicecontext.inc b/lcl/interfaces/gtk2/gtk2devicecontext.inc
index cd1f958e8e..1abae8c8ab 100644
--- a/lcl/interfaces/gtk2/gtk2devicecontext.inc
+++ b/lcl/interfaces/gtk2/gtk2devicecontext.inc
@@ -1151,7 +1151,7 @@ var
     for i := Low(ADashes) to High(ADashes) do
       ADashes[i] := ADashes[i] * Multiplier;
 
-    laz_gdk_gc_set_dashes(GC, 0, @ADashes[0], Length(ADashes));
+    laz_gdk_gc_set_dashes(GC, 4096, @ADashes[0], Length(ADashes))
   end;
 
 begin