anchor.diff:      Result.Position := 0;
     end
     else
  -  Result := nil;
  +    Result := nil;
   
   end;
   
  
positive.code:   Result := fEOF;
  end;
  
  function TSQLiteUniTable.FieldAsBlob(I: cardinal): TMemoryStream;
  var
    iNumBytes: integer;
  
negative.code:     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}
  