Hola David,
Lo necesito en VB6 !! :-) Sorry por la confusión.
Abrazo,
Marcelo
----- Original Message -----
From: David Brunstein
To: gufa List Member
Sent: Wednesday, May 02, 2007 12:45 PM
Subject: [gufa] [Off topic - VB6] Impresion matricial (plain text) desde
Visual Basic 6.0
Hola Marcelo,
Por el subject del email interprete que lo que necesitabas era en VB 6.0;
pero leyendo un cacho mas detenidamente el texto del email dice que lo
necesitas en Clipper...
De todas formas, lo que postea Roberto es lo mismo que yo hacia en
Clipper/Foxpro/DOS... y exactamente lo mismo a lo que haciamos en QuickBASIC 3.0
A la final, che, en que lo necesitas? en VB o Clipper?
Saludos,
Davo.
On 5/2/07, Roberto Darjover < [EMAIL PROTECTED]> wrote:
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
--
=======================
David Brunstein
Java/PB/VFP Developer
Winnipeg, MB
Canada
Before I speak, I have something important to say.
Antes de dar mi discurso, tengo algo importante que decir.
Antes de dar meu discurso, tenho algo importante para dizer.
G.M.
