Crystal para PDF com código de Barras

Question

Olá Pessoal,
Tenho um relatório desenvolvido em Crystal e nele tem a paresentação de um código de barras com fontes true type.
Quando apresento este relatório pelo CrystalReportViewer o código de barras aparece, mas quando uso o botão para exportar para PDF o código de barras não aparece no reltório.
Alguem pode me ajudar com isto?

Grato.

Answer 1

Posta a sua dúvida aqui:

http://social.msdn.microsoft.com/Forums/pt-BR/vsreportingpt/threads

Answer 2

Olá Pessoal,
Tenho um relatório desenvolvido em Crystal e nele tem a paresentação de um código de barras com fontes true type.
Quando apresento este relatório pelo CrystalReportViewer o código de barras aparece, mas quando uso o botão para exportar para PDF o código de barras não aparece no reltório.
Alguem pode me ajudar com isto?

Grato.

Answer 3

Olá Daxxel,

Eu tive o mesmo problema a um tempo atrás e resolvi da seguinte forma:

Para exportar o relatório com a fonte não teve jeito mesmo, no caso eu utilizava a "3of9barCode" e acabei realizando uma forma até que simples.

Salvei a fonte dinamicamente no banco e, no DataSet do relatório apenas chamei a imagem salva. Para realizar a conversão do texto ou código para código de barras eu utilizei uma referência chamada "BarcodeLib". segue abaixo método para converter em código de barra e salvar em imagem:

public static byte[] GeraImagemCodBarras(string codigo)
        {
            BarcodeLib.Barcode b = new BarcodeLib.Barcode();

            int W = 750;
            int H = 200;

            b.IncludeLabel = false;
            BarcodeLib.TYPE type = BarcodeLib.TYPE.CODE39;
            b.Encode(type, codigo.Trim(), Color.Black, Color.White, W, H);

            MemoryStream ms = new MemoryStream();
            b.SaveImage(ms, BarcodeLib.SaveTypes.BMP);

            return ms.ToArray();
        }

Espero ter ajudado!

Rafael Zaccanini

--------------------------------------------------------------------

Se a resposta te ajudou marque como útil

Answer 4

Oi Rafael,

Obrigado pela resposta, mas eu programo em VB e não entendo muito de C#. Sua resposta parece bem coerente, mas vc poderia me dar um exemplo em VB?

Grato,

Answer 5

Olha cara, eu não sei muito vb mas acho que ficaria mais ou menos assim:

 

 

Public Shared Function GeraImagemCodBarras(ByVal codigo As String) As Byte()

    Dim b As New BarcodeLib.Barcode()

   

    Dim W As Integer = 750

    Dim H As Integer = 200

   

    b.IncludeLabel = False

    Dim type As BarcodeLib.TYPE = BarcodeLib.TYPE.CODE39

    b.Encode(type, codigo.Trim(), Color.Black, Color.White, W, H)

   

    Dim ms As New MemoryStream()

    b.SaveImage(ms, BarcodeLib.SaveTypes.BMP)

   

    Return ms.ToArray()

End Function

 

Acho que já da para ter uma noção!

 

Abs,

 

Rafael Zaccanini

--------------------------------------------------------------------

Se a resposta te ajudou marque como útil

Answer 6

Olha cara, eu não sei muito vb mas acho que ficaria mais ou menos assim:

 

 

Public Shared Function GeraImagemCodBarras(ByVal codigo As String) As Byte()

    Dim b As New BarcodeLib.Barcode()



    Dim W As Integer = 750

    Dim H As Integer = 200

   

    b.IncludeLabel = False

    Dim type As BarcodeLib.TYPE = BarcodeLib.TYPE.CODE39

    b.Encode(type, codigo.Trim(), Color.Black, Color.White, W, H) 

    Dim ms As New MemoryStream()

    b.SaveImage(ms, BarcodeLib.SaveTypes.BMP)

   

    Return ms.ToArray()

End Function

 

Acho que já da para ter uma noção!

 

Abs,

 

Rafael Zaccanini

--------------------------------------------------------------------

Se a resposta te ajudou marque como útil