NotasFiscais.ImprimirPDF não está gerando o PDF no local solicitado

[Infoel]

Após atualização do ACBr a procedure:

 ACBrNFe1.NotasFiscais.ImprimirPDF;

não está criando o PDF no local indicado. Não ocorre erro nenhum, e nenhuma exceção é gerada, ele está gerando o arquivo no local do programa e não no local indicado.

Aqui está o código onde coloca o local para salvar o PDF:

xmlstream := TStringStream.Create(xml);
ACBrNFe1.NotasFiscais.LoadFromStream(xmlstream);
ACBrNFe1.DANFE.PathPDF := dir;

ACBrNFe1.NotasFiscais.ImprimirPDF;

 Se peço para salvar na área de trabalho a propriedade ACBrNFe1.DANFE.PathPDF fica com "C:\Users\User\Desktop\" , mas mesmo assim salva no local do executável.

Editado 29 Maio, 2020 por Infoel

[Italo Giurizzato Junior]

Boa tarde,

Verifique se você não esta definindo um nome para o PDF na propriedade NomeDocumento.

Se sim, este deve estar acompanhado do Path, caso contrario vai ser salvo na pasta que contem o executável.

[Infoel]

Boa tarde,

Não estava definindo a propriedade NomeDocumento, então tentei colocar de duas formas:

ACBrNFe1.DANFE.NomeDocumento := dir + '\NotaFiscal.pdf';

ACBrNFe1.DANFE.NomeDocumento := ACBrNFe1.DANFE.PathPDF + 'NotaFiscal.pdf';

Mas em ambas a propriedade NomeDocumento ficou somente com 'NotaFiscal.pdf' sem o Path antes.

Tentei também com ACBrNFeDANFeRL1 no lugar de ACBrNFe1.DANFE , mas deu na mesma.

[EMBarbosa]

1 hora atrás, Infoel disse:

Boa tarde,

Não estava definindo a propriedade NomeDocumento, então tentei colocar de duas formas:

ACBrNFe1.DANFE.NomeDocumento := dir + '\NotaFiscal.pdf';

ACBrNFe1.DANFE.NomeDocumento := ACBrNFe1.DANFE.PathPDF + 'NotaFiscal.pdf';

Mas em ambas a propriedade NomeDocumento ficou somente com 'NotaFiscal.pdf' sem o Path antes.

Tentei também com ACBrNFeDANFeRL1 no lugar de ACBrNFe1.DANFE , mas deu na mesma.

Boa tarde.

   Acabei de enviar uma possível correção para isso na revisão 20015.

   Poderia testar e reportar qualquer problema por favor?

   Nota: para definir o caminho do pdf, não é necessário atribuir a propriedade NomeDocumento. Mas se o fizer, confira o valor que ficar na propriedade PathPDF esteja correto.

[Infoel]

O componente TACBrNFeDANFeRL não permite limpar a propriedade "NomeDocumento" e por isso a linha 256 da unit ACBrNFeDANFeRLClass nunca é executada.

Para corrigir eu alterei a linha 254 para:

      Result := Self.PathPDF + Self.NomeDocumento

pois ela não tinha o caminho para salvar o arquivo e salvava sempre na pasta raiz do sistema.

[EMBarbosa]

54 minutos atrás, Infoel disse:

O componente TACBrNFeDANFeRL não permite limpar a propriedade "NomeDocumento" e por isso a linha 256 da unit ACBrNFeDANFeRLClass nunca é executada.

Para corrigir eu alterei a linha 254 para:

      Result := Self.PathPDF + Self.NomeDocumento

pois ela não tinha o caminho para salvar o arquivo e salvava sempre na pasta raiz do sistema.

foi exatamente o que eu alterei.