Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Generar códigos de barra code128 (https://www.clubdelphi.com/foros/showthread.php?t=72746)

r1d2m3 09-03-2011 22:17:47

Generar códigos de barra code128
 
Hola amigos, estoy realizando una aplicación que debe generar un código de barra code128, tengo entendido que debo usar alguna de las tantas fuentes disponibles que hay en la web, ya me bajé algunas pero mi problema es que antes de imprimir el código, debo generar su dígito de verificación, especificar el tipo de code128, a, b o c, y poner un caracter de terminación, creo. Mis preguntas son si ustedes ya han tenido que verselas con este tema, es decir generar el dígito de verificación, y concatenarlo a la cadena de texto a convertir en código de barras. Si pueden ayudarme con esto, les estaré muy agradecido.

Esperando alguna respuesta, los saludo atte.

ElKurgan 10-03-2011 09:45:48

¿tienes configurado el escaner para que lea ese tipo? A lo mejor está preparado para leer otros tipos de códigos.

Creo que el algoritmo es este:

El conjunto de caracteres 128C sólo tiene códigos numéricos y siempre es un número par; El valor de barras inicial, que indica que se trata de un 128C es 105.

Para el cálculo del dígito de control se toman todos los dígitos por pares; cada par se multiplica por su peso (posición) y se suman; Al total se le suma el código de inicio 105; El total resultante se divide por 103, tomándose el resto como dígito de control.

Código: 10123450012345

Se toman los pares de números y se multiplian por su peso:
10 * 1 = 10
12 * 2 = 24
34 * 3 = 102
50 * 4 = 200
01 * 5 = 5
23 * 6 = 138
45 * 7 = 315
---
794

+ 105
--- 899

899 / 103 = 8 (Resto 75): Por tanto el caracter de control es 75

Espero que esto disipe vuestras dudas.

Un saludo


La franja horaria es GMT +2. Ahora son las 04:23:28.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi