[vtdeleon]

Saludos

Esto debe funcionar:

Código Delphi [-]
 procedure Cualquiera;
begin
  query1.close;
  query1.sql.clear;
  query1.sql.add('Select * from tablaX');//cualquier tabla o Base de datos
  query1.open;
  ShowMessage(inttostr(query1.RecNo));
end;

Suerte