From 1995e2e820f86e7699154e3c1d992602f8a8f566 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sun, 29 Nov 2009 11:51:29 +0000
Subject: [PATCH] Try to fix sporadic access violation when destroying a
 non-results-query. Unlikely but probably fixes issue #1494 .

---
 source/mysql_connection.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/source/mysql_connection.pas b/source/mysql_connection.pas
index ca2f9cd8..e1779d08 100644
--- a/source/mysql_connection.pas
+++ b/source/mysql_connection.pas
@@ -778,7 +778,8 @@ end;
 destructor TMySQLQuery.Destroy;
 begin
   FreeAndNil(FColumnNames);
-  mysql_free_result(FLastResult);
+  if HasResult then
+    mysql_free_result(FLastResult);
   inherited Destroy;
 end;