Secuencia de Escape en Epson TM88III

[xio]

Tengo el mismo problema que tuviste tu hace 3 años. Yo estoy intentando dominar la impresora EPSON TM-L-60II, y no lo consigo. He visto este hilo y parece que puede ayudarme aunque no lo he probado. Trabajo con Delphi 4 y he probado el codigo que a ti te sirvio como solucion y nada. Espero que podais ayudarme por que de verdad que ya no se que hacer.

[xio]

Se me olvidó decir que yo intento imprimir un codigo de barras del tipo EAN13.

[xio]

Este es el codigo que utilizo para imprimir el codigo de barras

Código SQL [-]
AssignFile(f,'com2');
try
Rewrite(f);
Writeln ( f, #$1D + 'f' + #$1 ); //Esto es para seleccionar el tipo de caracteres HRI
Writeln ( f, #$1D + 'h' + #$20  ); //  Setea el alto
Writeln ( f, #$1D + 'w' + #$2  );  //  Setea el tamaño del ancho a 5
Writeln ( f, #$1D + 'H' + #$2  );  //  Seleccion la posición a imprimir
//EAN13 -> #$2
Writeln ( f, #$1D + 'k' + #$2 );   //  Imprime codigo de barras
Writeln ( f, '2690162200004' + #$0 ); // siempre acaba con nulo     
finally
CloseFile(f);
end;

[xio]

Ya lo he consegido!

[caifan_0883]

Woow, Probare haber si me funciona. Saludos