Contar registros en un ClientDataSet con filtro

[ecfisa]

Hola.

La propiedad RecordCount te devuelve la cantidad total de registros actuales.

Pero si lo que deseas es tener la cantidad total de registros, los filtrados y los ocultos podrías hacer:
Al filtrar:

Código Delphi [-]
...
begin
  ClientDataSet1.Filtered := False;
  ClientDataSet1.Tag      := ClientDataSet1.RecordCount;
  ...
  ( Aplicar el filtro )
  ...
  ClientDataSet1.Filtered := True;
end;

Ejemplo; mostrar resultado:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(Format('Total:%d, Filtrados:%d, Ocultos:%d',
    [ClientDataSet1.Tag, ClientDataSet1.RecordCount,
     ClientDataSet1.Tag-ClientDataSet1.RecordCount]));
end;

Saludos