From 4eda10f726d29d356cc315f5dc88da2ea86739be Mon Sep 17 00:00:00 2001
From: Ansgar Becker <anse@heidisql.com>
Date: Sun, 17 Apr 2022 11:33:02 +0200
Subject: [PATCH] Update cached object reference with new row count after
 inserting row, which may enable "Data" option in table copy dialog. Closes
 #666

---
 source/main.pas | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/source/main.pas b/source/main.pas
index 257b4183..2d4c277b 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -6033,6 +6033,7 @@ end;
 procedure TMainForm.DisplayRowCountStats(Sender: TBaseVirtualTree);
 var
   DBObject: TDBObject;
+  ObjInCache: PDBObject;
   IsFiltered, IsLimited: Boolean;
   cap: String;
   RowsTotal: Int64;
@@ -6065,6 +6066,13 @@ begin
         else
           cap := cap + ', ' + FormatNumber(Datagrid.RootNodeCount) + ' '+_('rows match to filter');
       end;
+      // Update cached object reference with new row count, which may enable "Data" option
+      // in table copy dialog. See issue #666
+      if Assigned(DBtree.FocusedNode) then begin
+        ObjInCache := DBtree.GetNodeData(DBtree.FocusedNode);
+        if Assigned(ObjInCache) and ObjInCache.IsSameAs(DBObject) then
+          ObjInCache.Rows := RowsTotal;
+      end;
     end;
   end;
   lblDataTop.Caption := cap;