[ingabraham]

ya lo resolvi, creo que era por el tipo de grafica en el codigo de barra.
mi codigo quedo asi, para el k le sirva, y doy por terminado el hilo.
gracias a los k siguieron este hilo.

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.OnChange := Self.Barcode1Change;
   Barcode1.Typ := TBarcodeType(22);//cambie esto que es el stilo de la imagen del codigo de barra


    Barcode1.ShowTextPosition := TShowTextPosition(5);
    Barcode1.ShowText := TBarcodeOption(1);

    Barcode1.Text := LCODBARRA.Caption;