Imprimir un Query en QuickReport

[anghell77]

Hola....el tìtulo de mi respuesta es por aquello de que no todos somos expertos, pero me ha tocado imprimir mediante Query en QReport

El QuickRep, tiene un DataSet, a éste hay que ligarlo al Query que desas imprimir. Si el Query requiere entradas, o necesita parámetros de entrada, bien puede mandarse a imprimir cuando se ejecute, si es que se ejecuta en algún momento atrás y mucho antes de mandarlo a imprimir, ésto es:
1.-Si Consultas en determinado momento tales datos mediante el Query que quieres imprimir, y ahí mismo deseas enviarlo a imprimir sólo basta alguna instrucción:

Código Delphi [-]
 
   FormX.QuickRep.Preview; //Para visualizarlo antes de imprimir;
   Formx.QuickRep.Print;//Para Imprimirlo sin ver el preeliminar

2.- Si el Query se debe ejecutar al momento de desear imprimir, y requiere datos para la ejecución, puedes ejecutar otros Query's antes para tomar la información y alimentar al que se imprimirá o bien almacenar los datos en variables.

3.- Si el Query no requiere entradas, pues mándalo llamar al momento de requerir imprimir.

Código Delphi [-]
 
Query.Close;
Query.Open;
FormX.QuickRep.Preview;

Lo importante del Asunto es que el QuickRep esté ligado en su DataSet al Query final a imprimir, así como todos sus componentes QDBText..

Ojalá sirva...

{Saludos}