BARLIB

[fullpaint]

Estoy utilizando desde hace tiempo BARLIB.
Me surgio un pequeño problema al querer utilizar Impresora Laser, antes usaba a Injet (chorro tinta).

xCor := ::oPrn:Cmtr2Pix(nArriba,nIzq)
yCor := ::oPrn:Cmtr2Pix(nAbajo,nDerecha)

nLen := ::oPrn:Cmtr2Pix( 4, 4 )[1]

@ xCor[1], xCor[2] + (nLen/5) ean8 cCod of ::oPrn banner

El problema es que cuando imprime no el codigo de barra sino el codigo, los numero que se encuentran abaja, con Laser usa un FONT un poco mas grande.
Creo que el codigo es este: linea 114 de BANNER.PRG

define font oFont name cFont of oPrInt size nWidth*5.6 , nLen*0.04 ;
nescapement if(lHorz,0,13500)

Alguien resolvio esto??

Muchas gracias

[dbzap]

Eduardo.
Serias tan amable de facilitarme algun ejemplo ( prg chiquito ) para imprimir codigos de barra?
Yo uso en la actualidad fwh+hb y requiero imprimir un codigo de barras en una nota de venta y no he tenido tiempo para probar e investigar ( esa es la verdad ).
Podrias ayudarme con esto.
Saludos

Julio Gonzalez V.

PD:intenté contactarte por msn pero no parecias conectado.