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

Leave SQL help action disabled as long as there is no selected connection. Fixes issue #3200.

Browse Source
This commit is contained in:
Ansgar Becker
2013-05-25 05:32:41 +00:00
parent 8dd4399395
commit 62da5d8833
2 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
source/main.dfm
View File

@ -2166,6 +2166,7 @@ object MainForm: TMainForm
object actSQLhelp: TAction object actSQLhelp: TAction
Category = 'Tools' Category = 'Tools'
Caption = 'SQL help' Caption = 'SQL help'
Enabled = False
Hint = 'SQL help browser' Hint = 'SQL help browser'
ImageIndex = 31 ImageIndex = 31
ShortCut = 112 ShortCut = 112

1
source/main.pas
View File

@ -7340,6 +7340,7 @@ begin
tabDatabase.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType <> lntNone); tabDatabase.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType <> lntNone);
tabEditor.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType in [lntTable..lntEvent]); tabEditor.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType in [lntTable..lntEvent]);
tabData.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType in [lntTable, lntView]); tabData.TabVisible := (FActiveDbObj <> nil) and (FActiveDbObj.NodeType in [lntTable, lntView]);
actSQLhelp.Enabled := Assigned(Node);
end; end;
// Store click history item // Store click history item