Código Delphi [-]MiConsulta.IsEmpty; //ó MiConsulta.RecordCount > 0;
MiConsulta.IsEmpty; //ó MiConsulta.RecordCount > 0;