Salvar Em Outra Pasta

[felipeiw]

Tem como configurar o componente acbrnfe, para salvar esses arquivos em outra pasta, pois no meu caso estao sendo gerados na mesma pasta dos xmls das nfe, e fica um tumulto de arquivos ?

 

20131105154358-ped-cad

20131105154359-cad

 

Abs

 

[Edson.pol]

Olá Felipe.

 

Eu faço assim:

 

exemplo:

 

var

    xCnpjEmpresa, PathNFe: String;

begin

 

  xCnpjEmpresa:='00111555111122';

 

  PathNFe:=ExtractFilePath(Application.ExeName);

 

  // Setar as pastas onde deseja salvar os arquivos

  DM.ACBrNFe.Configuracoes.Arquivos.PathNFe :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.PathCan :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.PathCCe :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.PathMDe :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.PathInu :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.PathDPEC :=PathNFe + xCnpjEmpresa;

  DM.ACBrNFe.Configuracoes.Arquivos.Salvar := True;

  DM.ACBrNFe.Configuracoes.Arquivos.EmissaoPathNFe :=True;

  // Pasta para os PDFs

  DM.ACBrNFe.DANFE.PathPDF := :=PathNFe + xCnpjEmpresa+'\PDF\;

 

  // Setar a pasta de arquivos gerais

  DM.ACBrNFe.Configuracoes.Geral.PathSalvar := PathNFe+xCnpjEmpresa+'\Temp\';

  DM.ACBrNFe.Configuracoes.Geral.Salvar := True;

  // Neste caso os arquivos temporários ficam numa pasta 'C:\Sistema\Cnpj da Empresa\Temp'

 

end;

 

 

[]´s

Edson.