opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-06 18:24:26 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix bug #736 cannot drop a table when cursor is on top of the tree

Browse Source
This commit is contained in:
Ansgar Becker
2008-09-12 22:51:28 +00:00
parent 1f194b4ba4
commit 09a42889b0
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/main.pas
View File

@ -1283,7 +1283,8 @@ begin
Tables := TWideStringlist.Create; Tables := TWideStringlist.Create;
Views := TWideStringlist.Create; Views := TWideStringlist.Create;
if Childwin.PageControlMain.ActivePage = Childwin.tabDatabase then begin if (Childwin.PageControlMain.ActivePage = Childwin.tabDatabase) and
((Sender as TAction).ActionComponent <> Childwin.PopupMenuDropTable) then begin
// Invoked from one of the various buttons, SheetDatabase is the active page, drop highlighted table(s). // Invoked from one of the various buttons, SheetDatabase is the active page, drop highlighted table(s).
Tables := GetVTCaptions(Childwin.ListTables, True, 0, NODETYPE_TABLE); Tables := GetVTCaptions(Childwin.ListTables, True, 0, NODETYPE_TABLE);
Tables.AddStrings(GetVTCaptions(Childwin.ListTables, True, 0, NODETYPE_CRASHED_TABLE)); Tables.AddStrings(GetVTCaptions(Childwin.ListTables, True, 0, NODETYPE_CRASHED_TABLE));