diff --git a/source/childwin.pas b/source/childwin.pas
index 9f79dec7..58d924ba 100644
--- a/source/childwin.pas
+++ b/source/childwin.pas
@@ -2978,6 +2978,7 @@ begin
       tn := DBTree.Selected;
       DBTree.Selected := DBTree.Selected.Parent;
       tn.Destroy;
+      RefreshActiveDbTableList;
       ShowDBProperties(self);
       Screen.Cursor := crDefault;
     end;
@@ -3349,6 +3350,7 @@ begin
   if i > -1 then
     SynSQLSyn1.TableNames[i] := S;
   ActualTable := S;
+  RefreshActiveDbTableList;
   ShowDBProperties(self);
   // re-select same item
   for i:=0 to ListTables.Items.Count-1 do
diff --git a/source/copytable.pas b/source/copytable.pas
index da6d337a..26f9a4db 100644
--- a/source/copytable.pas
+++ b/source/copytable.pas
@@ -279,6 +279,7 @@ begin
     zq.Next;
   end;
 
+  Mainform.Childwin.RefreshActiveDbTableList;
   Mainform.ChildWin.ShowDBProperties(self);
   close;
 
diff --git a/source/createtable.pas b/source/createtable.pas
index 7f91c842..10e79cca 100644
--- a/source/createtable.pas
+++ b/source/createtable.pas
@@ -211,6 +211,7 @@ begin
   try
     Mainform.ChildWin.ExecUseQuery( DBComboBox.Text );
     Mainform.ChildWin.ExecUpdateQuery( createQuery );
+    Mainform.Childwin.RefreshActiveDbTableList;
     Mainform.ChildWin.ShowDBProperties(self);
     Mainform.ChildWin.ActualTable := EditTablename.Text;
     Close;
diff --git a/source/main.pas b/source/main.pas
index 8636ca17..e521e5d4 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -1037,6 +1037,7 @@ begin
       end;
     end;
 
+    RefreshActiveDbTableList;
     ShowDBProperties(self);
     Screen.Cursor := crDefault;
   end;