enviar codigos ESC a impresora
Hola,
Necesito enviar los codigos de ESC a la impresora para la apertura del CAJON, CORTE DE TIQUET, Estos codigos se piden en campo EDIT He probabo de varias formas, pero no consigo que me funcione, lo que envio me lo interpreta como si fuera un texto normal. Agradeceria si alguien puede ayudarme. |
No estaría de mas que pusieras el código que estas usando, y los códigos (el numero) que quieres mandar.
|
Hay varias formas de enviar esos datos a la impresora.
Ejemplo de Abrir cajón (funciona en impresoras epson y compatibles):
|
Aqui hay algunos ejemplos
|
codigos a imprimir
TIenes razon,
Los codigos que yo quiero enviar a la impresora son: ESC + 'p 0 5 20' es para que se abra el cajon portamonedas. como he dicho antes, me lo interpreta como un texto, LineaTexto = chr(27)+ 'p 0 5 20' Writeln ( Fichero, LineaTexto); |
Segun creo, lo que tienes que mandar a la impresora son los caracteres #27#112#0#5#20, siendo el #112 = 'p'. Esto no seria un problema, lo malo es si necesitas introducir los comandos en un edit, en otro hilo dí la siguiente solución al problema, espero que te sirva:
|
Cita:
LineaTexto := chr(27) + 'p' + chr(0) + chr(5) + chr(20); Fíjate que '0' no es lo mismo que chr(0). En el primer caso envías el carácter '0' (carácter número 48 de la tabla ASCII) a la impresora, eso te imprimirá un 0. En el segundo enviarás el carácter número 0 de la tabla ASCII, que en este caso se usa como carácter de control. |
Gracias por vuestras respuestas. Creo que me servira.
|
La franja horaria es GMT +2. Ahora son las 06:58:42. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi