Clipper/FiveWin - Como Imprimir con la Impresora TM-T88III

 
Vista:

Como Imprimir con la Impresora TM-T88III

Publicado por Adolfo Lawson R. (9 intervenciones) el 15/03/2006 16:45:51
Hola a todos, necesito una ayuda para manejar la Impresora Termica Epson TM-T88III, como por Ejemplo:

Como cortar el Papel, Manejar las fuentes de las Letras, etc... se los agradecería un monto... y si me dan algunos pasos en Codigo fuente para dicha Impresora.

PD: el sistema que manejo es CLipper 5.2
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como Imprimir con la Impresora TM-T88III

Publicado por Antoni Masana (168 intervenciones) el 16/03/2006 08:30:23
Esta son las definiciones que uso para la Impresora Epson TM-T88III

El K_OPEN_CAJON abre el cajon del dinero (el programa es para un comercio)
El K_CUT_PAPER corta el papel

Las definiciones PR_ son los diferentes tipos de letra. El comentario indica la cantidad de caracteres por linea y el tipo de caracter (aproximadamente.)

No he encontre ningun manual de definición de tipos de impresión para esta impresora, lo que tengo esta sacado del programa original que estoy manteniendo.

Si alguien sabe más que lo incluya aqui.

Un saludo a todos.

* </> --------------------------------------------------------------------- </>
* </> ---&--- </> Definiciones </> ---&--- </>
* </> --------------------------------------------------------------------- </>

#define K_OPEN_CAJON CHR(29)+ CHR(97)+ CHR( 1)+ CHR(27)+ CHR(112)+ CHR(48)
#define K_CUT_PAPER REPLI(CHR(10),6) + CHR(29)+ CHR(86)+ CHR( 49)+ CHR(12)

* </> ---&--- </> Caracteres de control IMPRESORA TM-T88II

#define PR_SPAIN chr(27)+"R"+chr( 7) // Caracteres Españoles

#define PR_RESET chr(27)+"!"+chr( 0) // Desactiva
#define PR_PETIT chr(27)+"!"+chr( 1) // Linea 56 caracteres
#define PR_AGRAI chr(27)+"!"+chr( 2) // Linea 42 caracteres
#define PR_CAPCE chr(27)+"!"+chr( 9) // Linea 56 caracteres negrita
#define PR_EFECT chr(27)+"!"+chr(10) // Linea 42 caracteres negrita
#define PR_TOTAL chr(27)+"!"+chr(24) // Linea 42 caracteres Doble Alto
#define PR_TI_32 chr(27)+"!"+chr(32) // Linea 21 caracteres
#define PR_TITUL chr(27)+"!"+chr(57) // Linea 28 caracteres
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como Imprimir con la Impresora TM-T88III

Publicado por Adolfo Lawson R. (9 intervenciones) el 16/03/2006 16:37:18
Un Aporte muy Valioso mi Querido Compañero...
Te lo agradesco monton... GRACIAS TOTALES
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como Imprimir con la Impresora TM-T88III

Publicado por ANTONIO (4 intervenciones) el 17/03/2006 17:27:59
El problema mio es el siguiente:
tengo un programa en clipper que leva funcionando varios años y con impresoras matriciales de tikes sin problema, a pesar de que imprimo por el puerto serie.
lo que hago es entes de comenzar el programa redigijo la mode lpt1=com1 y solo tengo que imprimir normalmente pero el problema es con windows xp que me tarda 45 segundos en imprimir el tiquek, con windows 98 imprime directamente sim problemas, o me tengo que salir del programa e imprime inmediatamente.
si alguien me puede ayudar se lo agradeseria
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como Imprimir con la Impresora TM-T88III

Publicado por Adolfo Lawson R. (9 intervenciones) el 17/03/2006 17:59:54
Hola, espero que te sirva esto...

Si tienes la Impresora en Comunicacion COM1, deberas crear un Archivo por Lotes (xxx.bat) y ahi activar la comunicacion para la Impresora TM-T88III

Ejemplo:

edit xxx.bat

mode com1:9600,n,8,1
<nombre del programa .exe> o sea tu Programa Ejecutable...


Con esto le damos la Rapidez de la Impresa.

y en Lenguaje de Programacion deberia ser asi...

Ejemplo:

**
** Imprimi con la Direccion de comunicacion COM1 o LPT1 solo la cambias.
**
SET PRINTER ON
SET PRINTER TO COM1
SET DEVICE TO PRINTER
SET CONSOLE OFF

nLine := 1
sele 4
index on hh->cod_mesa+hh->cod_pers+hh->fecha to hh001
hh->( dbGoTop() )
While( hh->(!eof()) )

For x = 1 to hh->item
**
** Imprimes el texto...
**

Next x

HH->( dbSkip() )
EndDo

SET PRINTER OFF
SET CONSOLE ON
SET PRINTER TO
SET DEVICE TO SCREEN

return

Espero que te sirva esto... SUERTE y que la Fuerza te Acompañe mi joven PADAWAN
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar