Destroy AllDatabases list *after* collapsing database tree, when a session connect is in progress. Hopefully fixes issue #1491.

This commit is contained in:
Ansgar Becker
2009-12-05 19:57:44 +00:00
parent 44cedeed4e
commit 566ac4a581

View File

@ -1558,10 +1558,10 @@ begin
comboOnlyDBs.ItemIndex := 0
else
comboOnlyDBs.Text := '';
// Forces Tree.ReInitChildren to refetch database names
FreeAndNil(AllDatabases);
// All db nodes must get collapsed to avoid auto initialization of table caches (along with AVs)
menuTreeCollapseAllClick(Self);
// Forces Tree.ReInitChildren to refetch database names
FreeAndNil(AllDatabases);
RefreshTree(False);
DBTree.Color := GetRegValue(REGNAME_TREEBACKGROUND, clWindow, SessionName);