From 9074d5b7caa4f612be7f5b2e1e2f6431458045f6 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Thu, 1 Jan 2009 23:34:00 +0000
Subject: [PATCH] Fix AV after cancelling connection dialog

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

diff --git a/source/main.pas b/source/main.pas
index 1243cad6..a0c92933 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -1175,8 +1175,10 @@ begin
   SetLength(FQueryGridResult.Columns, 0);
 
   // Closing connection
-  FMysqlConn.Disconnect;
-  FreeAndNil(FMysqlConn);
+  if Assigned(FMysqlConn) then begin
+    FMysqlConn.Disconnect;
+    FreeAndNil(FMysqlConn);
+  end;
 
   EnterCriticalSection(SqlMessagesLock);
   FreeAndNil(SqlMessages);