Delphi - Crear un Código de barras

Hola a todos.
Estoy haciendo un programa donde un producto tiene un código de barras. Quisiera saber si hay alguna forma de generar el último dígito o de generar el código entero.
Gracias

¿Que tipo quieres usar?
¿Con que haces el codigo de barras?
Dependiendo del tipo de codigo, hay controles que lo calculan ellos o te dejan a ti el control de dicho digito