From 2d9a4bc70e634bc9bdb83b6adec55a1fd3cfcb37 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sat, 3 Apr 2010 17:10:59 +0000
Subject: [PATCH] Refresh and repaint ListTables immediately after reconnect,
 to avoid AVs on double click.

---
 source/main.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/main.pas b/source/main.pas
index 4b5d2503..e3cbba7d 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -6514,7 +6514,7 @@ end;
 procedure TMainForm.AfterClearDBObjects(Database: String);
 begin
   if (Database='') or (ActiveDatabase=Database) then
-    InvalidateVT(ListTables, VTREE_NOTLOADED, False);
+    InvalidateVT(ListTables, VTREE_NOTLOADED, True);
 end;