Como imprimir codigo de barra

[lafug]

Estimados Todos,

Necesito imprimir un ticket de venta donde debo imprimir el número del ticket en código de barra y no tengo idea de como hacerlo. Debo utilizar alguna librería o me basta con Five Win?.

Gracias de antemano por sus comentarios.

[cmsoft]

Podes utilizar un tipo de letra que sea codigo de barras, eso sería lo mas simple!

Code: Select all

AddFontResource( "i2of5txt.ttf" ) // Esta seria el FONT de codigo de barra 
   DEFINE FONT oFont4 NAME "Interleaved 2of5 Text"    SIZE 25, 170 
   .... los datos del ticket...
   oPrn:Say( x,y,STRTRAN(STR(nNumTicket,10)," ","0"),oFont4)

[lafug]

Gracias por tu respuesta cmsoft, pero no funciono en realidad imprimió el número mas alargado, me faltó algo?

[cmsoft]

Tenes que tener la fuente I2OF5TXT.TTF en la carpeta donde tenes el programa, o bien el font instalado.. (y evitas agregarlo desde recursos)

[lafug]

Ahora Funcionó!, pero como puedo eliminar el numero debajo de las barras?, imagino que puedo aplicar otros fonts.
Gracias nuevamente!

[cmsoft]

Si, tenes que buscar un font que no imprima los numeros debajo. Las he visto pero no se cual puede ser..
Saludos

[lafug]

OK, muchísimas gracias, tu ayuda me ha servido mucho

Saludos!