Aquí tienes un generador de códigos EAN y Code 39:
http://fishdesign.virtualave.net/bcgsw.zip
Algunas librerías que requiere no se incluyen en la descarga. Muchas se encuentran en http://www.uforesources.com/dlldownload.html o búscalas y bájalas a medida que las necesites.
Por si te interesa, en los números #27 y #28 del Boletín Pascal se publicó el artículo Códigos de Barra donde Alirio Gavida presenta un componente para generar códigos de barra Code 39 y Code 128 mediante el empleo de una fuente.
http://www.latiumsoftware.com/es/pascal/0027.php
http://www.latiumsoftware.com/es/pascal/0028.php
Espero que te sirva.
Ernesto D'Spirito
http://www.latiumsoftware.com/es/index.php
