diff --git a/source/main.dfm b/source/main.dfm
index cd9942c2..4a8da3b6 100644
--- a/source/main.dfm
+++ b/source/main.dfm
@@ -1247,7 +1247,6 @@ object MainForm: TMainForm
             OnChange = AnyGridChange
             OnColumnResize = DataGridColumnResize
             OnCreateEditor = AnyGridCreateEditor
-            OnDblClick = AnyGridDblClick
             OnEditCancelled = AnyGridEditCancelled
             OnEdited = AnyGridEdited
             OnEditing = AnyGridEditing
diff --git a/source/main.pas b/source/main.pas
index 5e0eca64..cd416e0c 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -1170,7 +1170,6 @@ type
       NewDPI: Integer);
     procedure menuCloseTabOnDblClickClick(Sender: TObject);
     procedure TimerRefreshTimer(Sender: TObject);
-    procedure AnyGridDblClick(Sender: TObject);
   private
     // Executable file details
     FAppVerMajor: Integer;
@@ -10338,13 +10337,6 @@ begin
   UpdateLineCharPanel;
 end;
 
-
-procedure TMainForm.AnyGridDblClick(Sender: TObject);
-begin
-  if actFollowForeignKey.Enabled and KeyPressed(VK_SHIFT) then
-    actFollowForeignKey.Execute;
-end;
-
 procedure TMainForm.AnyGridKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
 var
   g: TVirtualStringTree;