sql retornar quantidade de registros

boa noite, tenho o seguinte codigo para buscas.

sql := DataModule1.dsCliente.CommandText;
 DataModule1.dsCliente.CommandText := 'select * from CLIENTE where upper(Nomecliente) like upper('+QuotedStr(edBusca.text+'%')+') ';

e gostaria de saber a quantidade de registros encontrados, e exibir num label.

uso delphi 7

obrigado