este es el codigo que estoy utilizando para generar el codigo
Código Delphi
[-]
Barcode1 := TAsBarcode.Create(self);
Barcode1.Top := 5 ;
Barcode1.Left := 10;
Barcode1.Typ := bcCodePostNet;
Barcode1.Modul := 2 ;
Barcode1.Ratio := 2.0;
Barcode1.Height := 45 ;
Barcode1.Typ := TBarcodeType(2);
Barcode1.ShowTextPosition := TShowTextPosition(5);
Barcode1.ShowText := TBarcodeOption(0);
Barcode1.Text := LCODBARRA.Caption;
Image1.Picture := nil;
Barcode1.DrawBarcode(Image1.Canvas);