Problemas conTprinter

[jmua]

Hola foro,
Utilizo tPrinter para hacer un informe y hago esto:
Local oPrn,cNewPrn
cNewPrn := 'ZEBRA 2844Z' //Tomado de una tabla que saco de AGetPrinters()
PRINT oPrn To cNewPrn
oPrn:startPage()
datos del informe
..........
..........
oPrn:EndPage()
ENDPRINT
oPrn:End()
Hasta aqui muy bien, pero si me voy a generar otro informe por otra impresora.
Como puedo tomar la impresora que tenia selecionada por defecto antes de imprimir el primer informe?, pues se queda cNewPrn por defecto, y lo que no quiero es llamar aPrinterSetup() para selecionarla manualmente.

Muchas gracias

[Antonio Linares]

José Martin,

Prueba a no hacer oPrn:End() hasta el final de tu aplicación y crea el objeto impresora con PRINTER oPrn ... sólo una vez y mantenlo creado para sucesivos usos.

[jmua]

Gracias Antonio,
He encontrado por hay en el foro una funcion con la cual puedo hacerlo y funciona bien.
Pero tu solución creo que es buena.