Programación General > Pascal

 Imprimir Ean13 Con Secuencias De Escape

(1/1)

jonmendi:
Hola!
estoy intentando imprimir un EAN13 en una impresora de tickets de TEC (Toshiba). El proveedor me ha enviado las secuencias de escape, pero no consigo imprimir. La impresora sí admite como juego de caracteres los de ean13, pero la verdad, no sé exactamente qué significa esto. ¿Quiere decir que si pongo ese font como activo en la impresora hay algún modo de enviarle direcamente el ean? ¿O acaso necesito dibujar los ean a mano?

A la impresora accedo directamente, sería del estilo:

--- Código: Text --- Var  Impresora: TextFile;begin  AssignFILE(Impresora,'LPT1');  ReWrite(Impresora);  Write(Impresora, CHR(StrToInt('$1D'))+ CHR(StrToInt('$56'))); {Cortar papel}  CloseFile(Impresora);end  
¿Alguien tiene alguna pista que compartir?

Muchísimas gracias!

Jon

-DriverOp-:
Bueno, si la impresora admite ese juego de caracteres es solo cuestión de seleccionar ese juego y enviar la rastra de números.

jonmendi:
gracias!
después de mil pruebas me he dado cuenta que las secuencias de escape que me ha dado el proveedor están mal. Con las correctas sí que funcionan.

Un saludo,
Jon

Navegación

[0] Índice de Mensajes