Impresion Quick Report con consulta SQL

[oec2509]

Buenos dias compañeros del foro, Tengo una aplicación en Delphi 7 con SQL-2000 trabajo en Windows Xp sp2
Soy bastante nuevo en Delphi, he estado experimentando con quick report con los ejemplos Q2 Y Q3 pude ubicarme en mas o menos como crear un reporte y enviar a imprimir, Yo utilizo consultas de SQL para pasar los datos, utilizando Tquery y tengo la siguiente:

Código Delphi [-]
if ck_solo_mayores.Checked then begin
query:='SELECT CODIGO, DESCRIPCION, ANCHO, '+
'LARGO, CANTIDAD, EXISTENCIA '+
'FROM RESUMEN_NECESIDADES_ESPUMA '+
'WHERE CANTIDAD>=1 '+
'ORDER BY N.CODIGO, ANCHO, LARGO ';
end else begin
query:='SELECT CODIGO, DESCRIPCION, ANCHO, '+
'LARGO, CANTIDAD '+
'FROM RESUMEN_NECESIDADES_ESPUMA WHERE CANTIDAD>0 '+
'ORDER BY N.CODIGO, ANCHO, LARGO, EXISTENCIA ';
end;
ejecutar_con_active(fm_rpt_necesidades.sql_necesidades, query);
report.DataSet:=fm_rpt_necesidades.sql_necesidades;
report.Prepare;
report.Preview;

Pero me da el problema de que solo un registro, el ultimo, alguien me podria dar una luz de que estoy haciendo mal?

sql_necesidades es el Tquery y fm_rpt_necesidades es la forma donde esta el TQuickRep

Desde ya muchas gracias por toda la ayuda

[[Caral]]

Hola
No estoy seguro del por que el ultimo, normalmente cuando no se conecta el Dataset del QReport lo que muestra es solo el primero.
Si no es el dataset, puede ser algun problema con la consulta.
Saludos

[marcoszorrilla]

Por qué no visualizas la consulta en una rejilla provisionalmente, puede ser que por algún motivo como apunta Carlos solamente te esté devolviendo un registro.

Un Saludo.

[oec2509]

Estoy seguro de que la consulta no tiene ningun problema, porque la tengo en un DataGrid previo

[[egostar]]

Ya asignaste la propiedad DataSet del QReport al sql_necesidades

Salud OS

[oec2509]

Si lo asigne aca

ejecutar_con_active(fm_rpt_necesidades.sql_necesidades, query);
report.DataSet:=fm_rpt_necesidades.sql_necesidades; ****

No si asi es lo correcto