Bom dia.
Estou gerando NFCe offline num determinado cliente.
Em vez do arquivo ini o meu sistema gera o XML.
Quando vou enviar as NFCe emitidas offline, faço um loop para ler os XML e gerar o arquivo INI para enviar por lote.
nArq := 'C:\ACBrMonitorPlus\SAI.TXT';
cArqXml := PathSalvarCont + frmECFc.qArqCont.FieldByName('ChaveNfce').asString + '-nfe.xml';
cArqIni := PathSalvarCont + frmECFc.qArqCont.FieldByName('ChaveNfce').asString + '-nfe.ini';
Gera_Comando('NFe.LerNFe(' + cArqXml + ')'); // gera offline
while true do
begin
if FileExists(nArq) then
begin
Application.ProcessMessages;
Aguarde(false);
Break;
end;
end;
nArq := cAcbrNfeMonitor + CodEmpNfe + '\SAI.TXT';
mIni.Lines.LoadFromFile(nArq);
iVar := length(cArqXml);
mIni.Lines.Delete(0);
mIni.Text := '[infNFe]' + #13 + #10 + mIni.Text;
mIni.Lines.SaveToFile(cArqIni);
Pausa(2); // depois de gravar o arquivi INI faço uma pausa
DeleteFile(PChar(nArq)); // apago o arquivo C:\ACBrMonitorPlus\SAI.TXT para gerar o proximo INI
Depois de fazer algumas vezes o loop , da erro, na linha abaixo:
mIni.Lines.LoadFromFile(nArq);
Erro: Cannot open file "C:\ACBrMonitorPlus\SAI.TXT". O arquivo ja esta sendo usado por outro processo.
Por favor, alguem pode me socorrer?
Att. João Hintz