From 02504106f05263704fe01aa32037035dac01ed4e Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sat, 9 Nov 2013 05:22:28 +0000
Subject: [PATCH] Avoid running into access violation when accessing any host
 tab result when user pressed disconnect button. Fixes issue #3416.

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

diff --git a/source/main.pas b/source/main.pas
index 96267820..b159d8c5 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -7188,6 +7188,9 @@ var
 begin
   Idx := Sender.GetNodeData(Node);
   Results := GridResult(Sender);
+  // See issue #3416
+  if (Results = nil) and (Sender <> ListVariables) then
+    Exit;
   if Results <> nil then
     Results.RecNo := Idx^;