Exceção não levantada ao validar docPlacaMercosul e docRenavam

[Magnele Sales]

Ao validar alguns tipos de documentos a exceção não é gerada. Ao debugar pude verificar que a validação acontece corretamente, mas ao processar o bloco final do método Validar na linha 788 a lógica despreza o retorno quando  Assigned( fsOnMsgErro ) retorna false e fsRaiseExcept não foi setado... Para contornar modifiquei o bloco conforme abaixo. Mas talvez a solução esteja em outro ponto... 

if fsMsgErro <> '' then
  begin
     Result := false ;
     
     if Assigned( fsOnMsgErro ) then
       fsOnMsgErro( fsMsgErro )  else //Acrescentei aqui
         fsRaiseExcept := True; //Acrescentei aqui

     if fsRaiseExcept then
        raise Exception.Create( ACBrStr(fsMsgErro) );
  end ;

 

[EMBarbosa]

1 hora atrás, Magnele Sales disse:

Mas talvez a solução esteja em outro ponto... 

Bom dia...

Sim, a solução está em outro ponto. Se você quer que seja levantado uma exception, basta você alterar a propriedade "RaiseExcept" do componente para "True".