Seleccion de Impresora por Defecto

[olbeup]

Hola lbidi,

Efectivamente tienes razón, Prueba con esto otro, está funciona correctamente

Código Delphi [-]
...
var
  IDDefault: Integer;
begin
  // Guardar la impresora por defecto
  IDDefault := Printer.PrinterIndex;

  // Decir cual es la impresora que tiene que utilizar el QuickReport
  QuickRep1.PrinterSettings.PrinterIndex := IDDefault;
  QuickRep1.PreviewModal;

  // Restaurar la impresora por defecto
  Printer.PrinterIndex := IDDefault;
end;

Un saludo