From 625ed6ca90c471a0af309f5a384d9ecba0d3a7ce Mon Sep 17 00:00:00 2001
From: jesus <jesus@lazarus-ide.org>
Date: Thu, 31 Aug 2017 21:12:35 +0000
Subject: [PATCH] LCL, grids: update fixed cols/rows count on inserting a
 column/row in a fixed zone

git-svn-id: trunk@55766 -
---
 lcl/grids.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lcl/grids.pas b/lcl/grids.pas
index 53aebc4d10..1e0b82c103 100644
--- a/lcl/grids.pas
+++ b/lcl/grids.pas
@@ -6177,6 +6177,8 @@ begin
   if IsColumn then begin
     if Index>ColCount-1 then
       Index := ColCount-1;
+    if Index<FixedCols then
+      inc(FFixedCols);
     if columns.Enabled then begin
       Columns.InsertColumn(ColumnIndexFromGridColumn(index));
       ColRowInserted(true, index);
@@ -6188,6 +6190,8 @@ begin
   end else begin
     Frows.Insert(Index, pointer(-1));
     FGCache.AccumHeight.Insert(Index, nil);
+    if Index<FixedRows then
+      inc(FFixedRows);
   end;
   ColRowInserted(IsColumn, index);
   VisualChange;