Codigo barras

[truequeman]

hola.. me gustaria integrarle un lector de codigo de barras a una aplicacion que hice... tengo que configurar algo adicional para que me funcione? o que me recomiendan para trabajar con codigos de barras.
saludos.

[Wonni]

No tienes que configurar nada especial. El lector lo conectas a la entrada del teclado y el teclado al lector y no tienes que instalar nada. Lo mismo da que escribas con el teclado que pases el codigo por el lector.

Si tu aplicacion va a generar codigos de barras, entonces necesitaras algun componente. Por ejemplo: http://www.psoft.sk/

[truequeman]

ah orale. osea que capturando el codigo primero (ya teniendolo en la base de datos) luego scanneando el codigo ya lo lee? :eek: ...
Ups la pagina que me pasaste no jala.. te sabes alguna otra?.
y para yo hacer en mi aplicacion que me haga un codigo de barras de los "codigos de mis articulos" que ya hice en mi base de datos. (hacer una forma impresa como un sticker para despues imprimirla y luego scanearla despues),
saludos y gracias.

[Wonni]

Yo, el unico programa en el que genero codigos de barras lo hago en el formato Ean13 utilizando esta funcion:


Function CrearEan13(Cadena:String):String;

Var
SumaImp, Sumapar, SumaTotal, DC:Integer;

Begin
If Length(Cadena)<10 Then
Repeat
Cadena:='0'+Cadena;
Until
Length(Cadena)=10;

Cadena:='84'+Cadena;



SumaImp:=StrToInt(Cadena[1])+StrToInt(Cadena[3])+StrToInt(Cadena[5])+
StrToInt(Cadena[7])+StrToInt(Cadena[9])+StrToInt(Cadena[11]);

SumaPar:=StrToInt(Cadena[2])+StrToInt(Cadena[4])+StrToInt(Cadena[6])+
StrToInt(Cadena[8])+StrToInt(Cadena[10])+StrToInt(Cadena[12]);

SumaPar:=SumaPar*3;

SumaTotal:=SumaPar+SumaImp;

DC:=10-StrToInt(IntToStr(SumaTotal)[Length(IntToStr(SumaTotal))]);


If DC>0 Then
Begin
Result:=Cadena+IntToStr(DC);
End Else
Begin
Result:=Cadena+'0';
End;

End;



Como calcular el digito de control del Ean13 lo saque de aqui:

http://www.argcon.net/normalizacion/norma10.htm



Este programa lo tengo en 3 tiendas de ropa y todas tienen esta impresora para sacar las etiquetas:

http://www.siliconblue.net/index.php?action=products&man_id=32

Pero si haces una busqueda con google encontraras otras y mejores que esta.

Simplemente crea un reporte con la/s medidas de las etiquetas y ya esta. Lo suyo es que sea configurable.

En cuanto al componente de codigos de barras, pues yo en su dia probe varios, incluso fuentes. Pero al final di con el que te he indicado arriba y va de maravilla. Pero si haces una busqueda con google encontraras varios, pero eso ya, tendras que probarlos tu mismo y ver cual te satisface.

[Onti]

Yo también uso los componentes de Psoft y van muy bien y no he tenido ningun problema con ellos, son de pago...pero los valen

[Wonni]

Yo también uso los componentes de Psoft y van muy bien y no he tenido ningun problema con ellos, son de pago...pero los valen

Efectivamente, valen la pena. Hace ya mucho tiempo que los utilizo. Y como ya mencioné, llegué a probar varias opciones. Y la verdad, no son caros.

[Onti]

Por si acaso el sitio web www.psoft.sk/ (http://www.psoft.sk/) ya esta activo nuevamente

[truequeman]

ya probe muchos y ya tengo los codigos de algunos..
pero mi duda es cual es mejor:?
probe uno que solo genera el ean 13. que son 13 numeros a fuerzas con la ultima conversion manual del numero. eso lo he probado con un lector (scanner) y si me lee los codigos.. igual cuando los genero.
y ahora tengo otro que genera todos los formatos.. probe el ean128 y me gusta por que puede capturar un solo caracter en codigo de barras incluyendo texto. la cosa es.. si genero un codigo asi (impreso) lo puedo leer en otro lugar? o a fuerzas en donde lo hice?.