Marcelo, nosotros usamos algo como esto para imprimir en una epson de carro
ancho, es bien a manopla pero anda joya.
Espero te sirva.
Saludos.
Roberto
************************************************************
* Setea Impresora y Letra Condensada.
SET PRINTER TO XXXX.PRN
SET DEVICE TO PRINT
* - - configuro para letra condensada y 72 renglones
??? CHR(27) + CHR(64)
??? CHR(27) + "C" + CHR(72)
??? CHR(15)
FILA = 1
HOJA = 1
SELECT cursorxxxx
GO TOP
DO WHILE .NOT. EOF()
IF FILA >= 64
FILA = 1
HOJA = HOJA + 1
EJECT
ENDIF
IF FILA = 1
DO TITULOS WITH FILA, HOJA
ENDIF
*
* Imprime Linea
LINEA = "lo que imprimas como detalle"
@ FILA, 0 SAY LINEA
FILA = FILA + 1
ENDDO
EJECT
ENDIF
SET DEVICE TO SCREEN
SET PRINTER TO
RETURN
***************************************************************************
----- Original Message -----
From: Marcelo Hacker (LISTAS)
To: gufa List Member
Sent: Wednesday, May 02, 2007 11:04 AM
Subject: [gufa] [Off topic - VB6] Impresion matricial (plain text) desde
Visual Basic 6.0
Gracias Pablo, pero tambien lo hicimos... es exactamente la misma cuestión.
Por eso, el problema no es intentar "prueba y error", sino dar con alguien
que lo tenga funcionando hoy en día en un aplicativo en producción.
Sds
Marcelo
----- Original Message -----
From: PabloC
To: gufa List Member
Sent: Wednesday, May 02, 2007 10:51 AM
Subject: [gufa] [Off topic - VB6] Impresion matricial (plain text) desde
Visual Basic 6.0
Porque no imprimis a un archivo .txt y despues haces el viejo RUN Copy
archivo.txt > LPT1
Saludos
PabloC
----- Original Message -----
From: Marcelo Hacker (LISTAS)
To: gufa List Member
Sent: Wednesday, May 02, 2007 10:45 AM
Subject: [gufa] [Off topic - VB6] Impresion matricial (plain text) desde
Visual Basic 6.0
Gente,
Supongo que este problema tambien se presenta con el VisualFox, por ello
hago la consulta acá.
Se nos presentó un problema que aparentemente debería ser una pavada...
pero por lo que venimos renegando hace unos días y lo que hemos encontrado en
internet (MSDN/GOOGLE/ETC), parece que no es tan sencillo.
Simplemente necesitamos imprimir en modo texto a la usanza del viejo
Clipper, Fox, etc. a una impresora LX-300 (o una FX-890) y no por medio del
objeto printer de Visual.
Ya intentamos la apertura del puerto, funcionó bien, pero no respeta los
saltos de hoja en forma correcta, ni el Tear On de la impresora.
Si alguno de uds. ya lo tiene resuelto, les agradeceria si pudiesen
mandar un pequeño recorte de ejemplo del código (principalmente la
inicialización y cierre del documento o archivo de impresión).
Desde ya 1000 gracias por adelantado.
Marcelo Hacker
__________ Información de NOD32, revisión 2231 (20070430) __________
Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com
