diff --git a/lcl/grids.pas b/lcl/grids.pas
index 41513ee55a..d42773762d 100644
--- a/lcl/grids.pas
+++ b/lcl/grids.pas
@@ -8487,7 +8487,7 @@ begin
     end;
   finally
     if tmpCanvas<>Canvas then
-      FreeWorkingCanvas(Canvas);
+      FreeWorkingCanvas(tmpCanvas);
   end;
 
   if W=0 then