From 1ae0540c8efb9bf603bad2114ee216858be03b04 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 1 Oct 2016 12:37:30 +0000
Subject: [PATCH] fpspreadsheet: Fix worksheetgrid not recalculating row height
 in case of cell content or format change

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5234 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/fpspreadsheet/fpspreadsheetgrid.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/components/fpspreadsheet/fpspreadsheetgrid.pas b/components/fpspreadsheet/fpspreadsheetgrid.pas
index 3b9d1f3c9..92a7e09c3 100644
--- a/components/fpspreadsheet/fpspreadsheetgrid.pas
+++ b/components/fpspreadsheet/fpspreadsheetgrid.pas
@@ -4068,6 +4068,9 @@ begin
       gcol := GetGridCol(cell^.Col);
       AutoExpandToRow(grow, aeData);
       AutoExpandToCol(gcol, aeData);
+      lRow := Worksheet.FindRow(srow);
+      if (lRow = nil) or (lRow^.RowHeightType <> rhtCustom) then
+        UpdateRowHeight(grow, true);
     end;
     Invalidate;
   end;