TACBrECF.GetMFAdicional não está compilando

[EMBarbosa]

Na revisão 2159, o método TACBrECF.GetMFAdicional foi alterado e está gerando erro na compilação no Delphi 2010. O problema é a variável Letra que está Char, mas o retorno da função PadL é AnsiChar. A correção é só alterar a Letra para AnsiChar.

 function TACBrECF.GetMFAdicional: String;

var

  Letra: AnsiChar; //
begin

  ComandoLOG := 'MF Adicional' ;


  Letra := PadL(RightStr(fsECF.NumSerie, 1),1)[1];

  if CharIsAlpha(Letra) then

    Result := Letra

  else

    Result := '';

end;[/code]

[Daniel Simoes]

Acho que o Isaque já corrigiu...

Me desculpem pelo problema (eu que fiz o commit)... Infelizmente não tenho um D2010 para testar antes de commitar...

[EMBarbosa]

Acho que o Isaque já corrigiu...

Corrigiu sim. Não se preocupe.