>Hola a todos.
>
>Tengo una aplicación en la que algunos informes los envío en formato texto con esta estructura de impresión:
>
>
>SET DEVICE TO PRINTER
>SET PRINTER ON
>@ 1,1 SAY
>....
>SET PRINTER OFF
>SET DEVICE TO SCREEN
>
>
>Las impresoras son diferentes modelos de Epson FX, todas en LPT1 y configuradas para imprimir en el Spool de Windows y que empiecen a escribir en cuanto llegue el informe.
>
>Todo funciona correctamente, excepto que al salir del programa la impresora alimenta una hoja en blanco. ¿Qué estoy haciendo mal?
>
>Muchas gracias por su ayuda.
>
>Saludos cordiales
>
>Manuel Tovar
>Barranquilla - COLOMBIA
Creo que sería más conveniente preparar todo el archivo de texto previamente, y luego enviarlo de una sola vez a la impresora:
lcReport = FileToFile("temp.tmp")
??? Codigos_Impresora + lcReport
Así, el archivo generado también te puede servir como vista preliminar, por ejemplo, con MODIFY COMMAND.
Tal vez querrás ver también mi download #
9991, que te simplifica la creación de informes en modo texto. Y de informes Excel también.
Difference in opinions hath cost many millions of lives: for instance, whether flesh be bread, or bread be flesh; whether whistling be a vice or a virtue; whether it be better to kiss a post, or throw it into the fire... (from Gulliver's Travels)