Hola.
Para cargar las impresoras en un ComboBox:
Código Delphi
[-]
uses Printers;
procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items := Printer.Printers;
ComboBox1.ItemIndex := 0;
...
end;
Para indicarle a QuickReport la impresora seleccionada, revisa el mensaje
#8 de este enlace:
¿como Imprimir a varias impresoras'?
Saludos