Problema con TQuery.RecordCount

[[kuan-yiu]]

Hola a todos y gracias de antemano por vuestro tiempo.

Me acaba de aparecer un problema fantasma. Lo llamo así porque ayer no estaba y hoy me está volviendo loca.
Ejecuto una consulta, me aseguro que tiene datos y siempre que llego a la línea en la que está "RecordCount" me da -1.

Código Delphi [-]
  qinforme.Close;
  qinforme.Open;
//...
  if qinforme.IsEmpty then
    begin
      ShowMessage('No hay datos');
      exit;
    end;
//...
      ProgressBar1.Position:= 0;
      ProgressBar1.Min:= 0;
      ProgressBar1.Max:= qinforme.RecordCount;

He cambiado la consulta, para añadirle un nuevo campo, es todo lo que he hecho... salvo tecleos o borrados accidentales de los que no soy consciente (que me lo estoy planteando).