Erro Na Geração De Pdf No Acbrboletofcquick No Delphi Xe2

[clrhm]

Amigos, estou usando o ACBrBoletoFCQuick para emissão de boletos dentro do Delphi XE2, mas acontece que o arquivo gerado está dando erro dentro do Acrobat Reader, ele diz que não pode abrir o arquivo porque não há suporte a esse tipo de arquivo ou ele foi danificado, inclusive o tamanho do pdf gerado é de cerca de 490 kb enquanto um gerado pelo ACBrBoletoFCFortes dá cerca de 62 kb e o Adobe consegue abrir normalmente, esse problema só ocorre dentro do Delphi XE2, no quase falecido Delphi 7 o ACBrBoletoFCQuick gera o PDF sem erros.

Alguém sabe o que pode estar causando isso e como resolver ?

Obrigado.

[Juliomar Marchetti]

Deixa perguntar o QuickReport no XE2 é oficial o ilícito?

[clrhm]

Não-oficial. Porque ?

[Juliomar Marchetti]

Já pensou na possibilidade do problema ser isso? pode ter algum bloqueio

[clrhm]

o do delphi 7 também é não-oficial e dá o mesmo problema, se fosse bloqueio nem gerava o pdf, acontece que ele gera o arquivo pdf mas na hora de abrir o pdf o acrobat da erro, alem de ter um tamanho bem maior do que o gerado pelo fortes, o pdf do fortes da 60 kb de tamanho e do quick dá 490

[leonardog]

Será que o TnPDF.pas não está bem desatualizado? A nfe não utiliza ele para gerar pdf.

[Daniel Braghini]

No arquivo ACBrBoletoFCQuickFr, no método Imprimir substituí o código abaixo:

 

               MultiExport := TQRMultiExport.Create(self);

               try

                  MultiExport.Report       := RLLayout ;

                  MultiExport.ExportFormat := qrxPDF ;

                  MultiExport.FileName     := NomeArquivo ;

                  MultiExport.ShowDialog   := MostrarSetup ;

                  MultiExport.DPI          := 300 ;

                  MultiExport.DoExport ;

               finally

                  MultiExport.Free ;

               end ;

 

POR: 

 

RLLayout.ExportToFilter(TQRPDFDocumentFilter.Create(NomeArquivo + '.pdf'));

 

Então consegui salvar o arquivo corretamente, sem corrupção