Problemas con OnfilterRecord

[Besto]

Hola,
resulta que tengo una aplicación en la que realizo varios filtros y ahora quieren que ponga el número de registros que cumplen las condiciones (son como 10 ò 12 filtros).

Para filtrarlos uso el evento de la base de datos OnFilterRecord y lo que he intentado hacer es que cuando el evento devuelve true entonces sumo 1 a una variable.
El caso es que cuando el número de registros que devuelve es menor de 15 me funciona bien, pero cuando el número es mayor de 15 me devuelve siempre 15 y no sé que es lo que puede pasar.

Si alguien me puede decir como solucionarlo, o alguna forma de saber el número de registros que cumplen los filtros os lo agradecería.

Un saludo.

[[Al González]]

¡Hola a todos!

¿Podrías mostrarnos algo del código?

Un abrazo confundido.

Al González.

[Besto]

Bueno la cosa sería algo así:

procedure TfrDatosApli.TbEquFilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept := true;
//pongo las condiciones para el filtro

if Accept then
NumRegistros := NumRegistros + 1;

//NumRegistros es la variable donde voy guardando los registros que cumplen la condición. La inicializo a cero antes de filtrar la tabla.

end;

Lo que necesito saber es cuantos registros cumplen la condición, si hay alguna otra forma que no consuma mucho tiempo tampoco me importa.

[karocs]

Saludos

podrías intentar asignar a la variable que te guarda el total de registros la propiedad recordcount del dataset despues que termine de filtrar todos los datos. espero sea lo que necesitas

....

[Paoti]

¡Hola!

A mi se me ocurre lo siguiente.

En tu dataset, crear un campo calculado. Ejemplo: NumRegistro. (click boton derecho sobre tu dataset, fieldseditor, add field, calculated)

y en el evento OnCalcFields del dataset. asignar esta sentencia.

Código Delphi [-]
procedure TFrmArticulos.TablaCalcFields(DataSet: TDataSet);
begin
TablaFiltradaNumRegistro.asInteger := TablaFiltrada.Recno - 1;
end;

asi, tendrás un campo 2persistente" que te dice en que registro estas, y cuantos son los que tienes.

[Besto]

Gracias karocs, pero con el recordcount me devuelve el número total de registros de la tabla y yo necesito el número de registros filtrados.

Respecto a la respuesta de Paoti no entiendo bien lo que me indica, con el recno tendría el puesto del registro en la tabla, pero con eso no puedo saber el número de registros filtrados.

Gracias a los dos. Sigo esperando porque todavía no he encontrado la solución.