opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-14 10:02:10 +08:00
Code Issues Packages Projects Releases Wiki Activity

Auto expand active database on startup. See http://www.heidisql.com/forum.php?t=7471

Browse Source
This commit is contained in:
Ansgar Becker
2011-01-09 07:23:58 +00:00
parent 11256e914b
commit fcb7fcffab
1 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
source/main.pas
View File

@ -2769,7 +2769,7 @@ var
SessionExists, RestoreLastActiveDatabase: Boolean;
StartupScript, StartupSQL, LastActiveDatabase: String;
StartupBatch: TSQLBatch;
SessionNode: PVirtualNode;
SessionNode, DBNode: PVirtualNode;
begin
Connection := TMySQLConnection.Create(Self);
Connection.OnLog := LogSQL;
@ -2814,9 +2814,12 @@ begin
// Set focus on last uses db. If not wanted or db is gone, go to root node at least
RestoreLastActiveDatabase := GetRegValue(REGNAME_RESTORELASTUSEDDB, DEFAULT_RESTORELASTUSEDDB);
LastActiveDatabase := GetRegValue(REGNAME_LASTUSEDDB, '', Session);
if RestoreLastActiveDatabase and (Connection.AllDatabases.IndexOf(LastActiveDatabase) >- 1) then
SetActiveDatabase(LastActiveDatabase, Connection)
else begin
if RestoreLastActiveDatabase and (Connection.AllDatabases.IndexOf(LastActiveDatabase) >- 1) then begin
SetActiveDatabase(LastActiveDatabase, Connection);
DBNode := FindDBNode(DBtree, LastActiveDatabase);
if Assigned(DBNode) then
DBtree.Expanded[DBNode] := True;
end else begin
SessionNode := GetRootNode(DBtree, Connection);
SelectNode(DBtree, SessionNode);
DBtree.Expanded[SessionNode] := True;