Nome do Arquivo Remessa

[Gr@c@]

Na função CalcularNomeArquivoRemessa, Banco Itaú só aceita 8 caracteres sendo DDMMAA00.rem sendo 00 o sequencial do dia. Tudo bem que é possível informar o nome do arquivo, como estou fazendo, mas não seria o caso de tratar isso também no componente? Sendo banco 341, não ter o prefixo "cb"?

Motivo: o meu aplicativo estava gerando com o cb porque não havia me atentado ao nome. Como o cliente não me avisou para fazer a correção, ele mesmo estava renomeando o arquivo retirando o prefixo. Porém, quando o meu aplicativo procurava pelo nome do arquivo para achar o proximo sequencial do dia, não encontrava e gerava sempre o mesmo nome.  

Somente sugestão. 

function TACBrBancoClass.CalcularNomeArquivoRemessa : String;
var
  Sequencia :Integer;
  NomeFixo, NomeArq: String;
begin
   Sequencia := 0;

   with ACBrBanco.ACBrBoleto do
   begin
      if NomeArqRemessa = '' then
       begin
         NomeFixo := DirArqRemessa + PathDelim + 'cb' + FormatDateTime( 'ddmm', Now );

         repeat
            Inc( Sequencia );
            NomeArq := NomeFixo + IntToStrZero( Sequencia, 2 ) + '.rem'
         until not FileExists( NomeArq ) ;

         Result := NomeArq;
       end
      else
         Result := DirArqRemessa + PathDelim + NomeArqRemessa ;
   end;
end;