From e359ad2f982515e02f42d6f54f695fa8ba690a9a Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Mon, 14 Jun 2010 21:50:27 +0000
Subject: [PATCH] Reset FRecNo after executing a new query, otherwise SetRecNo
 does nothing if FRecNo was already 0. Fixes issue #2009.

---
 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 85e3636c..851ca4ba 100644
--- a/source/mysql_connection.pas
+++ b/source/mysql_connection.pas
@@ -1662,7 +1662,8 @@ begin
           end;
         end;
       end;
-      RecNo := 0;
+      FRecNo := -1;
+      First;
     end else begin
       SetLength(FColumnTypes, 0);
       SetLength(FColumnLengths, 0);