anchor.diff:      Sqlite3_Reset(Query.Statement);
     end;
   end;
  +
  +procedure TSQLiteDatabase.ExecSQL(const SQL: String; var RowsAffected: Integer);
  +begin
  +  GetPreparedStatementIntf(SQL).ExecSQL(RowsAffected);
  +end;
  +
   {$WARNINGS ON}
   
   {$WARNINGS OFF}
  
positive.code:   iNumBytes := Sqlite3_ColumnBytes(fstmt, i);
    if iNumBytes > 0 then
    begin
      Result := TMemoryStream.Create;
      ptr := Sqlite3_ColumnBlob(fstmt, i);
      //call it again - see sqlite docs
      iNumBytes := Sqlite3_ColumnBytes(fstmt, i);
  
negative.code:     /// </summary>
      /// <param name="SQL">SQL statement which should not return resultset</param>
      procedure ExecSQL(const SQL: String); overload;
      procedure ExecSQL(const SQL: String; var RowsAffected: Integer); overload;
      procedure ExecSQL(Query: TSQLiteQuery); overload;
      function PrepareSQL(const SQL: String): TSQLiteQuery;
      procedure BindSQL(Query: TSQLiteQuery; const Index: Integer; const Value: Integer); overload;
  