Buscar

Exibindo uma mensagem personalizada quando ocorrer qualquer erro.

Código

// Para não ocorrer aquele erro em Inglês que exibe uma tela do Delphi parecendo que seu programa deu pau, faça o seguinte:

//Insira um Componente ApplicationEvents (Additional) no formulário principal. No Evento //OnException insira:

  ShowMessage('Erro Inesperado.');

Pronto.
 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Object pascal
Adicionada dia: 02/12/05
Por: Cláudio Roberto Resende Camargos
Visualizada: 3879 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009