Secuencia de Escape en Epson TM88III

[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;