diff --git a/lcl/interfaces/gtk3/gtk3wscontrols.pp b/lcl/interfaces/gtk3/gtk3wscontrols.pp
index 4858cce0f4..9f2e26a78b 100644
--- a/lcl/interfaces/gtk3/gtk3wscontrols.pp
+++ b/lcl/interfaces/gtk3/gtk3wscontrols.pp
@@ -378,6 +378,7 @@ begin
     cairo_destroy(tmpCtx);
     cairo_surface_destroy(tmpSurf);
     cairo_destroy(cr);
+    cairo_region_destroy(aRegion);
   end else
     TGtk3Widget(AWinControl.Handle).Update(nil);
 end;