ayuda con set printer to name
Publicado por marcos (190 intervenciones) el 04/12/2007 19:28:40
hola a todos, tengo una consulta sobre informes especificamente al enviar un informe a una impresora al utilizar "set printer to name getprinter()". El tema es que cada vez que utilizo este comando me envia una hoja en blanco antes de enviar mi informe.
En el init del form tengo establecido en set printer on, y al terminar de imprimir restablezco la impresora predeterminada de windows, y de vuelta me envia una hoja en blanco.
Aca esta mi codigo:
* Captura impresora Default
lcDefaultPrinter = SET("PRINTER",3)
lcPrinter = GETPRINTER()
IF !EMPTY(lcPrinter)
SET PRINTER TO NAME (lcPrinter)
ELSE
WAIT WINDOW 'No se eligió ninguna impresora!!' nowait
ENDIF
set printer to name (lcDefaultPrinter)
Ah, esto lo hace ya sea con impresoras laser o matriciales.
Desde ya muchas gracias.
En el init del form tengo establecido en set printer on, y al terminar de imprimir restablezco la impresora predeterminada de windows, y de vuelta me envia una hoja en blanco.
Aca esta mi codigo:
* Captura impresora Default
lcDefaultPrinter = SET("PRINTER",3)
lcPrinter = GETPRINTER()
IF !EMPTY(lcPrinter)
SET PRINTER TO NAME (lcPrinter)
ELSE
WAIT WINDOW 'No se eligió ninguna impresora!!' nowait
ENDIF
set printer to name (lcDefaultPrinter)
Ah, esto lo hace ya sea con impresoras laser o matriciales.
Desde ya muchas gracias.
Valora esta pregunta


0