Delphi - Cómo controlar el Cancelar de un PrinterSetup de Q

Buenas.

Tengo una aplicación en Delphi7 que necesita imprimir ciertos datos convenientemente formateados, para lo cual uso QuickReport.

El problema surge a la hora de sacar el PrinterSetup para seleccionar la impresora de destino. Sin QuickReport, hacía lo siguiente (siendo "Impresion" un formulario):

if PrinterSetup.Execute then
Impresion.Print;

Con QuickReport, tengo esto:

Impresion.QuickRep1.PrinterSetup;
Impresion.QuickRep1.Print;

pero así (lógicamente) imprime tanto aceptando como cancelando la ventana de PrinterSetup. He probado una mezcla entre ambos, tal que así:

if PrinterSetup.Execute then
Impresion.QuickRep1.Print;

pero entonces saca el informe siempre por la impresora por defecto. ¿Cómo podría controlar esto?

Llama al procedimiento QuickRep1.Preview o PreviewModal para que te lo muestre en pantalla y desde alli,desde el boton adecuado, llamas a la configuracion de la impresora.
Suerte

Gracias, pero creo que eso no me sirve. Una de las peculiaridades del programa es que sólo puede imprimir cada documento una vez, por lo que tengo que controlar yo cuando se realiza la impresión.

Usa la propiedad "Tag" de Quickreport.
El procedimiento Printersetup pone el Quickreport.Tag en1 si se presiona btnCancelar y 0 si se presiona btnAceptar.