+ Added empty TMySQLconnection.UnPrepareStatement

git-svn-id: trunk@1680 -

fcl/db/sqldb/mysql/mysql4conn.pas

@@ -55,6 +55,7 @@ Type
     Function AllocateTransactionHandle : TSQLHandle; override;
 
     procedure PrepareStatement(cursor: TSQLCursor;ATransaction : TSQLTransaction;buf : string; AParams : TParams); override;
+    procedure UnPrepareStatement(cursor:TSQLCursor); override;
     procedure FreeFldBuffers(cursor : TSQLCursor); override;
     procedure Execute(cursor: TSQLCursor;atransaction:tSQLtransaction;AParams : TParams); override;
     procedure AddFieldDefs(cursor: TSQLCursor; FieldDefs : TfieldDefs); override;
@@ -233,6 +234,11 @@ begin
     end
 end;
 
+procedure TMySQLConnection.UnPrepareStatement(cursor: TSQLCursor);
+begin
+  // not necessary
+end;
+
 procedure TMySQLConnection.FreeFldBuffers(cursor: TSQLCursor);
 
 Var