[erickahr]

En lo personal lo manejo asi, solo por costumbre ya que la respuesta de marcoszorrilla, es muy buena, esto es solo otra opcion , Saludos.

Código Delphi [-]
 
Var
  Cuantos:Integer;
Begin
  Query1.Close;
  Query1.Sql.Clear;
  Query1.Sql.Add('Select Count(*)  as contados From Clientes');
  Query1.Open
 
  Cuantos:=Query1.FieldByName('contados').Value;
end;