From a4f2e2aee8418723804e79f625fc8eb50ebd1ed8 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Wed, 5 Aug 2009 19:01:30 +0000
Subject: [PATCH] Ignore a dangerous shortcut pressing when neither DBTree nor
 ListTables has focus. Fixes issue #1284

---
 source/main.pas | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/source/main.pas b/source/main.pas
index bc356c3f..df4296ce 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -2636,10 +2636,11 @@ begin
   // Add selected items/tables to helper list
   if ListTables.Focused then
     t := GetVTCaptions(ListTables, True)
-  else begin
+  else if DBTree.Focused then begin
     t := TWideStringList.Create;
     t.Add(SelectedTable.Text);
-  end;
+  end else
+    Exit;
   if t.Count = 0 then
     Exit;