Ver Mensaje Individual
  #8  
Antiguo 26-03-2012
Avatar de olbeup
olbeup olbeup is offline
Miembro
 
Registrado: jul 2005
Ubicación: Santiago de la Ribera (España)
Posts: 685
Reputación: 19
olbeup Va camino a la fama
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
__________________
Al hacer una consulta SQL, haz que los demás te entiendan y disfruten de ella, será tú reflejo de tú saber.

Última edición por olbeup fecha: 26-03-2012 a las 08:51:14.
Responder Con Cita