Não parece correto... você está chamando a geração do TXT da MFD.. e não do Binário da MF...
procedure TACBrECF.PafMF_ArqMF(const NomeArquivo: String;
DataInicial, DataFinal: TDateTime;Assinar: Boolean );
var
EADStr: String;
begin
if (not fsAtivo) then
raise EACBrECFNaoInicializado.create( ACBrStr(cACBrECFNaoInicializadoException) );
Self.ArquivoMFD_DLL(DataInicial, DataFinal, NomeArquivo,
[ docTodos], finMF);
if not FileExists(NomeArquivo) then
raise EACBrEADException.CreateFmt('Arquivo MFD: "%s" não foi gerado', [NomeArquivo]);
if Assinar then
begin
// assinar o arquivo baixado da impressora
EADStr := 'EAD' + GetACBrEAD.CalcularEADArquivo(NomeArquivo);
// gravar o arquivo texto com a assinatura EAD
WriteToTXT(ChangeFileExt(NomeArquivo, '.TXT'), EADStr, False, True);
end
end;
Esse foi justamente o motivo de eu ter modificado o nome dos métodos... (confusão entre Binário e TXT)