Selección de impresora con Quick Report tras la previsualización.

var
PrinterSettings: TQuickRepPrinterSettings;

en ese caso tendrás que asignarle en el OnPreview lo siguiente:

   With TFCustomPreview.Create(Self) do
   begin
    QRPreview1.QRPrinter := QuickRep1.QRPrinter;
    PrinterSettings := QuickRep1.PrinterSettings;
    Show;
   end;

y luego en el click de tu botón de imprimir haces lo siguiente:

If  PrintSetupDialog1.Execute Then
 begin
     PrinterSettings.PrinterIndex:= Printer.PrinterIndex;
     QRPreview1.QRPrinter.Print;
 end;