EXCESSÕES
Estou com um probleminha e gostaria de saber se voces sabem como me ajudar.
Meu problema é não conseguir usar as excesões no delphi, já procurei informações no livro do Teixeira, em uma apostila que tenho só de excessões e por ai vai.
O detalhe é que implemento os comandos no bloco protegido, mas sempre que uma excessão é executada, o programa não a trata.
Ex:
begin
Try
srttofloat(Edit1.Text);
Except On EconvertError do ShowMessage(´Erro de Conversão Verifique os Dados Inseridos!!´);
End;
End;
Parece perfeito, mas a excessão não é tratada.
Obs: Estou usando do Delphi 6.0, mas já fiz este teste na versão 5.0 mas também não consegui.[b:37990d4484][/b:37990d4484]
Meu problema é não conseguir usar as excesões no delphi, já procurei informações no livro do Teixeira, em uma apostila que tenho só de excessões e por ai vai.
O detalhe é que implemento os comandos no bloco protegido, mas sempre que uma excessão é executada, o programa não a trata.
Ex:
begin
Try
srttofloat(Edit1.Text);
Except On EconvertError do ShowMessage(´Erro de Conversão Verifique os Dados Inseridos!!´);
End;
End;
Parece perfeito, mas a excessão não é tratada.
Obs: Estou usando do Delphi 6.0, mas já fiz este teste na versão 5.0 mas também não consegui.[b:37990d4484][/b:37990d4484]
Riemke
Curtidas 0
Respostas
Rosivaldo
15/05/2003
Tem que atribuir uma varável para ele converter não??
begin Try MinhaVariavelFloat := srttofloat(Edit1.Text); Except On EconvertError do ShowMessage(´Erro de Conversão Verifique os Dados Inseridos!!´); End; End;
GOSTEI 0
Motta
15/05/2003
http://community.borland.com/article/0,1410,27185,00.html
GOSTEI 0