Fórum Como criar e tratar exceções? #260626
30/11/2004
0
Por exemplo, se quizesse tratar um erro de conversão de uma string para um número inteiro, como faria o código da exceção?
Porque fiz da seguinte forma, mas não funcionou. Ele retorna a mensagem de erro de conversão do delphi.
Try
A := StrToInt(Edit1.Text);
Except on EConvertError do ShowMessage(´Erro de conversão!´);
End;
Ricardovs
Curtir tópico
+ 0Posts
30/11/2004
Paulo_amorim
Pelo que eu vi está correto...
Eu testei seu código aqui e ele deu a mensagem que vc criou...
Tem certeza que o erro ocorre exatamente nessa linha?
Tente implementar esse código, e veja o que retorna. Se ele retornar ´EConvertError´ então não faz nenhum sentido. Se retornar outra coisa, então o problema não deve ser isso
Como outra alternativa, você pode tentar mudar para
on Exception do ShowMessage(´Erro de conversão´);
Porém isso deixará teu código genérico, e não terá como pegar mais de uma exceção por vez
Até+
Gostei + 0
30/11/2004
Ricardovs
on Exception do ShowMessage(´Erro de conversão´);
Será que eu não tenho que desabilitar em algum lugar no Delphi a opção de mostrar mensagens de exceção?
Porque no meu caso ele mostra apenas a mensgem de erro do Delphi.
Gostei + 0
30/11/2004
Gandalf.nho
Gostei + 0
30/11/2004
Ricardovs
Valeu galera!!!
Gostei + 0
30/11/2004
Paulo_amorim
Lembrando que quando essa opção está marcada o ´erro´ ocorrerá somente no compilador, na aplicação em si (a partir do executável) isso não ocorre
Até+
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)