1

Gostaria de saber se tem como evitar a ocorrencia de loops infinitos de erros no Delphi XE2. Esses erros normalmente são erros criticos de falta de algum arquivo (como DLL) ou sem permissão de acesso a algo.

Utilizo tratamento de exceção, porém em casos muito esporádicos alguns desses erros ocorrem, porém se torna impossível finalizar a aplicação sem ser pelo Gerenciador de Tarefas do Windows, pois ao clicar no OK da mensagem outra aparece.

Alguém tem uma dica de como evitar este loop, nem que para isso seja preciso finalizar a aplicação

Abaixo um exemplo de mensagem:

Exemplo de erro

1
  • 6
    O jeito de evitar esta repetição de exceção em série é entender o que a causa e eliminar esta causa. Se você souber o que causa a exceção, você pode corrigir ou tratar.
    – Caffé
    Commented 9/01/2015 às 19:08

1 Resposta 1

4

Como citado pelo @Caffe em comentário, o correto seria você capturar as exceções lançadas e trata-las. O erro de Violação de Acesso é algo crítico, supondo que exceções do gênero ocorram ao usuário final do seu programa, é certo que você terá problemas futuramente.

Veja o exemplo abaixo onde trata erros específicos.

Try
   // Fazer algo aqui.
Except
   On E : EInOutError do 
     // Não é possível alocar memória
     // Tratar esse erro aqui.

   On E : EAccessViolation do 
     // Violação de acesso
     // Tratar esse erro aqui 

   On E: EExternalException do
     // Erro Interno
     // Tratar esse erro aqui.
   else
     ShowMessage('Erro desconhecido. Contate o administrador do sistema.');
end;

Porém, se você quiser impedir que exceções sejam lançadas pelo Debugger, faça o seguinte rota:

ToolsOptionsDebugger OptionsLanguage Exceptions, desabilite a caixa de verificação Notify on language exceptions.

inserir a descrição da imagem aqui

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .