Danfe Pdf Em Quickreport

[Ivan de Souza]

PessoALL, bom dia!

 

 

Estou imprimindo o Danfe em QuickReport 5 no Delphi XE3.

 

Preciso salvar o PDF após a impressão do Danfe automaticamente.

 

Pra isso, estou usando ACBrNFe.NotasFiscais.ImprimirPDF;

 

Porém ele não salva o PDF. Eu tenho o filter PDF do QuickReport instalado no meu Delphi, pois vi no código fonte a diretiva que usa ele. Criei a diretiva QReport_PDFconforme está na unit ACBrNFeDANFeQR, mas mesmo assim não consigo criar o PDF. Alguém sabe o que mais tenho que fazer?

 

Desde já agradeço!

 

obs: já adianto que procurei pelo fórum antes de postar.

[Régys Silveira]

Procure no ACBr.inc dentro da pasta ACBrComum pelo seguinte trecho:

// Definições para o Quick Report
// Descomente a linha abaixo caso o Quick Report tenha suporte a PDF
//------------------------------------------------------------------------------
//{$DEFINE QReport_PDF}

 

Descomente a linha: {$DEFINE QReport_PDF} e recompile o ACBr.

[Ivan de Souza]

Perfeito! Muito obrigado pela dica!

Só mais uma coisa ... Nesse meu exemplo tenho 1 produto na NFe. Quando imprime a linha dele logo abaixo é impresso linhas verticais pra cada coluna, como se fosse imprimir outro produto. Não sei se me fiz entender, mas segue o PDF gerado. Será que tem como fechar o quadro sem essas linhas excedentes ou tenho que editar no QuickReport?

 

Obrigado!

31121204019406000258550010000000131000000137.pdf

[Régys Silveira]

Eu não uso o quickreport, não sei te dizer se teria como, talvez um colega que utilize deixe uma dica aqui.

[Ivan de Souza]

Valeu, Régis, obrigado!