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) <[EMAIL PROTECTED]>
*To:* gufa List Member <[email protected]>
*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 <[EMAIL PROTECTED]>
*To:* gufa List Member <[email protected]>
*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) <[EMAIL PROTECTED]>
*To:* gufa List Member <[email protected]>
*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.
