Delphi - imprimir

Hola, ET, tus lineas de codigo funcionan a la perfeccion, me trae el cuadro de dialogo de la impresora, solo tiene un pequeño inconveniente, y es como esas linea de codigo van dentro del evento onclick de un boton cuando le doy un clik al boton el me me ejecuta todo el codigo, por lo que cuando al cuadro de dialogo de la impresora le doy cancelar el como quiera imprime por que me ejecuta todo esa linea de codigo.

Mi pregunta es como arreglar este pequeño codigo para que cuando le de un clikc, en la el boton cancelar de la impresora no me ejecute ninguna accion este es el codigo:

QuickRep1.Prepare;
QuickRep1.PrinterSetup;
QuickRep1.Print;


Atte. Principainte

Utiliza dos botones uno para el setup y otro para mandar a imprimir y esto debe resolver tu problema.