En lo personal lo manejo asi, solo por costumbre ya que la respuesta de marcoszorrilla, es muy buena, esto es solo otra opcion
![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)
, 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;