Fiz a seguinte alteração:
removi a definição da variável Liquidação e sua inicialização e alterei o teste dessa forma:
For i:=0 to ACBrBoleto1.ListadeBoletos.Count -1 do
if ACBrBoleto1.ListadeBoletos.OcorrenciaOriginal.Tipo in [toRetornoLiquidado,
toRetornoLiquidadoEmCartorio,
toRetornoLiquidadoParcialmente,
toRetornoLiquidadoSaldoRestante,
toRetornoLiquidadoSemRegistro,
toRetornoLiquidadoPorConta,
toRetornoLiquidadoEmCartorio,
toRetornoLiquidadoAposBaixaOuNaoRegistro] then
begin
end;
Pelo menos não existiu nenhum erro na compilação. Acredito que funcione sem problemas. Seria uma boa prática? Só penso no caso de existir a necessidade de teste em mais lugares. Teria que reescrever sempre.
Obrigado.
Claudiney
Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.