Erro ao setar pathpdf

[rogercon]

Boa Noite,

 

Quando seto esta propriedade em tempo de execução, recebo uma mensagem de exception indecifrável, alguém já passou por isso, já até mesmo me certifiquei se o diretório realmente existe, e mesmo existindo gera excessão ao passar por essa linha.

 

 

  ACBrNFSe1.DANFSe.PathPDF:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\enviadas\'+anomesatual+'\pdf\';

Obrigado à todos.

Valeu

[Italo Giurizzato Junior]

Roger,

O componente de DANFSE foi incluído no form junto com o ACBrNFSe ?

Se sim, foi feito o link entre eles?

[rogercon]

Parcialmente consegui resolver,

 

Antes eu setava tudo junto,

//  ACBrNFSe1.DANFSe.PathPDF:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\enviadas\'+anomesatual+'\pdf\';
  ACBrNFSe1.Configuracoes.Arquivos.PathCan:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\canceladas\'+anomesatual;
  ACBrNFSe1.Configuracoes.Arquivos.PathNFSe:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\enviadas\'+anomesatual;
  acbrnfse1.Configuracoes.Arquivos.PathSchemas:= dm.q_empresalogadaSCHEMAs_nfse.AsString;
  ACBrNFSe1.Configuracoes.Arquivos.PathGer:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\ger\'+anomesatual;
  ACBrNFSe1.Configuracoes.Arquivos.PathRPS:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\rps\'+anomesatual;
  ACBrNFSe1.Configuracoes.Arquivos.PathSalvar:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\salvar\'+anomesatual;
 

 

Repare que a primeira linha eu comentei, que é onde gerava a excessão, daí peguei esta linha e coloquei ela antes de imprimir o pdf, e deixei ambos os componentes citados na sua pergunta, sem link entre eles, e ficou conforme abaixo:

 

          frmgenericos.ACBrNFSe1.danfse:= frmgenericos.ACBrNFSeDANFSeRL1;
          FRMGENERICOS.ACBrNFSe1.DANFSe.PathPDF:= dm.q_empresalogadaCAMINHOARQUIVOS_NFSE.AsString+'\enviadas\'+anomesatual+'\pdf\';
          frmgenericos.acbrnfse1.Enviar(vNumLote);
          frmgenericos.ACBrNFSe1.DANFSE.ImprimirDANFSePDF();