Ver Mensaje Individual
  #1  
Antiguo 19-12-2006
rebollo75 rebollo75 is offline
Miembro
 
Registrado: nov 2004
Posts: 46
Reputación: 0
rebollo75 Va por buen camino
codigo de barras en un ticket

hola amigos. tengo un pequeño problema, como casi cada uno de los que entramos aqui. tengo que imprimir un codigo de barras en una impresora de ticket termica samsung srp-350 que por supuesto imprime codigo de barras.

en los codigos de control pone:

CONTROLCODIGODE CODIGOSHEXADECIMALFUNCION<GS> k m … NUL1D 6B m… NULimprime codigo de barras<GS> k m n …1D 6B m n …

he probado con esto:

var F: TextFile;
begin
AssignFile(F,'COM1');
Rewrite(F);
write(F,chr(29)+ chr(104)+ '1' + chr(00)); //codigo de barras
write(F, 'prueba');
writeln(F,chr(29)+ chr(86)+ '1'); //corta el papel
CloseFile(F);
end;

he probado con otras maneras pero no me sale lo que pongo en codigo de barras. he estado leyendo algo de generadores de codigos de barras. tengo que poner uno? como seria todo eso?

muchas gracias.
Responder Con Cita