También lo que puedes hacer es antes de imprimir guardar la impresora por defecto.
Código Delphi [-]...
var
IDDefault: Integer;
begin
IDDefault := Printer.PrinterIndex;
QuickReport.PrinterSetup;
...
...
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.
|