Localizando Endereço Nfe Para Impressão Do Danfer

[kleberibm]

Pessoal Bom dia.

 

Pessoal, no que se trata de de programação para nfe sou leigo.

A minha dúvida é o seguinte: Tenho um sistema que usei o componente, mas agora estou tendo dificuldades para fazer algumas mudanças como por exemplo informando o caminho do Xml tanto para salvar o XML depois de validado, quanto para localiza-lo após validado para fazer a impressão.

 

Pessoal, preciso que por favor quem poder me ajudar, preciso passar os parâmetros no componente ACBrNfe2 para que o mesmo Salve o XML em determinada pasta e também após a validação seja localizado o mesmo para a sua impressão isso em modo de execução. Alguém poderia me ajudar por favor. Obrigado á todos!

[centuryinf]

ola

 

acbrnfe1.configuracoes.arquivos.pathsalvar:='c:\.............\';

acbrnfe1.configuracoes.arquivos.pastamensal:=true';

acbrnfe1.configuracoes.arquivos.salvar:=true';

 

//impressao

procedure TNFE2.btnImprimirClick(Sender: TObject);
begin
  OpenDialog1.Title := 'Selecione a NFE';
  OpenDialog1.DefaultExt := '*-nfe.XML';
  OpenDialog1.Filter := 'Arquivos NFE (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*';
  OpenDialog1.InitialDir :=ACBrNFe1.Configuracoes.Geral.PathSalvar+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\nfe';
  if OpenDialog1.Execute then
  begin
    ACBrNFe1.NotasFiscais.Clear;
    ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName);
    ACBrNFe1.NotasFiscais.Imprimir;
  end;

end;
 

espero que ajude