Fix bug #728 cannot open the tree with cursor keys after starting HeidiSQL

This commit is contained in:
Ansgar Becker
2008-09-07 16:01:07 +00:00
parent efbadf5b58
commit 75efa8358e

View File

@@ -3784,9 +3784,10 @@ var
n: PVirtualNode;
begin
n := FindDBNode(db);
if Assigned(n) then
DBtree.Selected[n] := true
else
if Assigned(n) then begin
DBtree.Selected[n] := true;
DBtree.FocusedNode := n;
end else
raise Exception.Create('Database node ' + db + ' not found in tree.');
end;