Como pegar o Evento atual?
Boa tarde galera,
Estou criando uma rotina de tratamento de erros e gostaria de pegar o evento atual.
Exemplo:
Faz de conta que o usuario clicou no botão1 ai ocorre um erro, ai quero gravar o evento em uma tabela ... com o seguinte texto: erro no evento botao1onClick
alguém pode me ajudar ?
Obrigado !!!
Estou criando uma rotina de tratamento de erros e gostaria de pegar o evento atual.
Exemplo:
Faz de conta que o usuario clicou no botão1 ai ocorre um erro, ai quero gravar o evento em uma tabela ... com o seguinte texto: erro no evento botao1onClick
alguém pode me ajudar ?
Obrigado !!!
Joaohueder
Curtidas 0
Respostas
Aroldo Zanela
04/08/2008
Colega,
Delphi ainda é Orientado a objeto e não a aspecto. Portanto, atualmente a única forma de se fazer isso (certo) é introduzindo blocos try...except em cada evento.
Delphi ainda é Orientado a objeto e não a aspecto. Portanto, atualmente a única forma de se fazer isso (certo) é introduzindo blocos try...except em cada evento.
GOSTEI 0
Joaohueder
04/08/2008
[quote:7f1d4cf037=´Aroldo Zanela´]Colega,
Delphi ainda é Orientado a objeto e não a aspecto. Portanto, atualmente a única forma de se fazer isso (certo) é introduzindo blocos try...except em cada evento.[/quote:7f1d4cf037]
Bom dia Aroldo,
é justamente o que vou fazer, eu só queria saber se tem como pegar o evento atual, pois na hora do except vou gravar na tabela de log_erro onde deu o erro.
Vlw e obrigado pela atenção !
Delphi ainda é Orientado a objeto e não a aspecto. Portanto, atualmente a única forma de se fazer isso (certo) é introduzindo blocos try...except em cada evento.[/quote:7f1d4cf037]
Bom dia Aroldo,
é justamente o que vou fazer, eu só queria saber se tem como pegar o evento atual, pois na hora do except vou gravar na tabela de log_erro onde deu o erro.
Vlw e obrigado pela atenção !
GOSTEI 0
Paulo
04/08/2008
try
seus códigos
except
on E:Exception do begin
ShowMessage(´Nome do Erro´ + e.message);
end;
No lugar do ShowMessage, use seu código de gravar log. Pode usar o TApplicationEvents para tratar eventos de erros.
GOSTEI 0