Buscar por:

Ignorando 'todas' exceções do programa

Código

{Tratamento de exceção (aqueles erros comuns) é muito importante para otimizar um programa montado com o Delphi. Ignorar esses erros às vezes também pode ser importante. Veja uma maneira para fazer isso, em 3 passos:}

1.

Coloque um componente TApplicationEvents, da paleta Additional, no Form do programa.

2.

O TApplicationEvents expõe o evento OnException(veja na janela Object Inspector > guia Events). Clique duplo no campo deste evento para o Delphi gerar a seguinte procedure:

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;  E: Exception);

begin

end;

3.

Agora, vem a parte mais engraçada. Digite, entre as palavras chave begin e end, um "comentário" ou simplesmente as duas barras (//).

Teste isso num programa que lance uma exceção e veja o resultado. Na ide do Delphi, a mensagem de erro pode aparecer, mas no seu programa, tal mensagem deve ser ignorada.