trate assim:
try
faça alguma coisa;
except
on e:exception do
TrataErros(Self, e);
end;
2009/7/31 Thiago gmail <thiago.racha...@gmail.com>:
>
>
> Fiz o procedimento abaixo para tratar as exceptions e gostaria de saber como
> faço para que a aplicação grave o log mas continue executando o restante do
> código.
>
> procedure TForm1.TrataErros(Sender: TObject; E: Exception);
> begin
> GravaLog;
> end ;
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
--
____________________________
José Benedito
Software Developer
skype:jb.sologix
