FiveTech Software tech support forums

tengo un problema al utilizar barlib no se bien la sintaxis alguien me podria decir cual es

pakotel wrote:tengo un problema al utilizar barlib no se bien la sintaxis alguien me podria decir cual es

Mira BARCODE.CH, ahí tienes la sintaxis.

Saludos
Carlos G.

Hola Pakotel,

Comando para EAN13 ( extraido del fichero README.ES incluido en BARLIB de Cayetano Gómez )


@ <nRow>, <nCol> EAN13 <cCode> ;
[ <lVert:VERTICAL> ];
[ COLOR <nColor> ] ;
[ WIDTH <nWidth> ] ;
[ SIZE <nSize> ] ;
[ OF <oPrint>] ;
[ BANNER ];
[ FONT <cFOnt> ]


@ <nRow>, <nCol> CM_EAN13 <cCode> ;
[ <lVert:VERTICAL> ];
[ COLOR <nColor> ] ;
[ WIDTH <nWidth> ] ;
[ SIZE <nSize> ] ;
[ OF <oPrint>] ;
[ BANNER ];
[ FONT <cFOnt> ]


nRow, nCol : Posicion de impresion del Código de barras
en ean13 son pixels, en c_ean13 son centimetros

cCode : caracteres a imprimir, en el rango '0' a '9'.
han de ser hasta 12 digitos, si se expresan menos se completar n
con '0'. No se ha de incluir el checkdigit, que es calculado por
las rutinas.

oPrint: Objeto Print, objeto sobre el que imprimir

nColor : el color de las Barras.

lOrientación : .t. = horizontal (defecto), .f. = vertical

nWidth := ancho del módulo, es decir , de la barra más fina, en
cent¡metros. por defecto 0,025 cm.

nSize := Longitud de las barras ( ya sea en sentido vertical u
horizontal). Por defecto 1,5 cm.

BANNER : en caso de que se quiera que se imprima el código debajo
del código de barras, debidamente formateado y en su sitio.
Incluso en vertical y del color de las barras

cFont : NOMBRE de la fuente que se usar , por defecto ARIAL, el
tamaño, ancho y alto, de la fuente es calculado en función al temaño
del código de barras y su orientación

Por ejemplo:

Code: Select all  Expand view


#include "FiveWin.ch"
#include "BarLib.ch"

FUNCTION Main()
   LOCAL oPrn

   PRINT oPrn PREVIEW

   oPrn:StartPage()

   @  1, 1 CM_EAN13 "123456789012" OF oPrn
   @ 10, 1 CM_EAN13 "841234512345" OF oPrn COLOR CLR_HBLUE ;
      WIDTH 0.1 SIZE 7.5 BANNER

   oPrn:EndPage()

   ENDPRINT

RETURN NIL

   

Saludos