Problema Con Quickreport

[marcoszorrilla]

Lo más simple es que antes de lanzar QuickReport, pongas un filtro a la tabla por un campo único que seguramente será ID es decir la Clave Primaria.

Código Delphi [-]
Table1.Filter:='ID ='+Table1Id.AsString;
Table1.Filtered:=True;
//Aquí lanzas quickreport

Table1.Filter:='';
Table1.Filtered:=False;

Un Saludo.

[rgstuamigo]

Revisar éste hilo..
Saludos...

[[Caral]]

Hola
Es lo mas lógico (hacer un filtro).
Por lo menos con tan poca información.
Saludos

[Richard Mejia]

Empezado por marcoszorrilla

Lo más simple es que antes de lanzar QuickReport, pongas un filtro a la tabla por un campo único que seguramente será ID es decir la Clave Primaria.
Código Delphi [-]Table1.Filter:='ID ='+Table1Id.AsString; Table1.Filtered:=True; //Aquí lanzas quickreport Table1.Filter:=''; Table1.Filtered:=False;


Un Saludo.

no entiendo ese codigo ademas me da error cuando ejecuto el programa

[rgstuamigo]

Empezado por Richard Mejia

no entiendo ese codigo ademas me da error cuando ejecuto el programa

Bueno... el código de marcoszorrilla es solo un ejemplo de cómo debes hacer el filtrado de tu DataSet (Table,Query,etc.),lo cual no significa que que debes copiarlo tal como está..,, debes adaptarlo de acuerdo al código que tú tienes. Por ejemplo veo que tu dataSet se llama VconsultaServicios y segun tu código dicho componente está en un DataModule entonces debes cambiar esa parte. mas o menos así:

Código Delphi [-]
DataModule1.VconsultaServicios.Filter:='ID ='+Table1Id.AsString;{<-Es lógico que esta linea depende del nombre de tus
                              campo o columnas de tu tabla  }
DataModule1.VconsultaServicios.Filtered:=True;
//Aquí lanzas quickreport

DataModule1.VconsultaServicios.Filter:='';
DataModule1.VconsultaServicios.Filtered:=False;