opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-16 20:11:48 +08:00
Code Issues Packages Projects Releases Wiki Activity

Do not switch from "Query" to "Host" main tab when disconnecting. Hopefully does not break what I've done in r3868.

Browse Source
This commit is contained in:
Ansgar Becker
2012-09-28 18:04:30 +00:00
parent fea0e8e194
commit c728bb2631
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
source/main.pas
View File

@ -1553,6 +1553,7 @@ begin
// SynMemo font, hightlighting and shortcuts // SynMemo font, hightlighting and shortcuts
SetupSynEditors; SetupSynEditors;
SetMainTab(tabHost);
FBtnAddTab := TSpeedButton.Create(PageControlMain); FBtnAddTab := TSpeedButton.Create(PageControlMain);
FBtnAddTab.Parent := PageControlMain; FBtnAddTab.Parent := PageControlMain;
ImageListMain.GetBitmap(actNewQueryTab.ImageIndex, FBtnAddTab.Glyph); ImageListMain.GetBitmap(actNewQueryTab.ImageIndex, FBtnAddTab.Glyph);
@ -7209,7 +7210,6 @@ begin
end else begin end else begin
LogSQL('DBtreeFocusChanged without node.', lcDebug); LogSQL('DBtreeFocusChanged without node.', lcDebug);
FreeAndNil(FActiveDbObj); FreeAndNil(FActiveDbObj);
MainTabToActivate := tabHost;
tabHost.Caption := 'Host'; tabHost.Caption := 'Host';
tabDatabase.Caption := 'Database'; tabDatabase.Caption := 'Database';
// Clear server version panel // Clear server version panel