Paulo,
Essa função tá declarada no início do código com outro nome... vc tem
que renomeá-la...
Tem também que criar uma varíavel na função que pega o nome da unit...
Funciona blzinha!
[]´s
Luis Alberto.
--- Em delphi-br@yahoogrupos.com.br, plucaslazaro
[EMAIL PROTECTED] escreveu
Luis,
: [delphi-br] Re: try...except
Paulo,
O código completo eh aquele mesmo que o colega Wagner
postou... só tem que renomear a função e criar 1 ou 2
variáveis... eu uso no Delhpi 2K5 Win32. Tenho quase
certeza que funcionará corretamente no Delphi 7,
porque os comandos e funções utilizados são bem
Acho que para esse caso seria interessante fazer um select antes, para
ver se o código já existe. Mas, um exemplo de tratamento seria esse:
try
Query1.Post;
except
on E: Exception do
MessageDlg('Ocorreu o seguinte erro!'#13#10 + E.message,
mtWarning, [mbOK], 0);
Talvez a utilização do evento OnPostError fosse mais simples não?
- Original Message -
From: Osmar de Souza Júnior
To: delphi-br@yahoogrupos.com.br
Sent: Friday, September 09, 2005 8:19 AM
Subject: [delphi-br] Re: try except
Acho que para esse caso seria interessante
: [delphi-br] Re: try except
E como faria isso no evento OnPostError ??
Porque é importante informar o usuário que ocorreu um erro, informá-lo
com alguma mensagem. Se tiver um exemplo, agradeço.
[]s.
--- Em delphi-br@yahoogrupos.com.br, Maurício Chiarato Vaglieri
[EMAIL PROTECTED
5 matches
Mail list logo