| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
mtbteste1 Novato

Registrado: Terça-Feira, 18 de Outubro de 2011 Mensagens: 67
|
Enviada: Sex Mai 10, 2013 10:05 am Assunto: Não dispara evento OnReconcileError no SimpleDataSet |
|
|
Amigos,
Uso Delphi 2010, Firebird 2.5 e DBExpress.
Preciso pegar um evento que ocorra ao gerar um select que dá erro. Em vez de fazer isso (try/except):
| Código: |
simpledataset1.close;
try
simpledataset1.open;
except
showmessage('Erro');
end;
|
Preciso pegar o erro/exception quando dá um open. Mas ao fazer um select com "erro", não dispara o evento OnReconcileError... alguém sabe como? Preciso disso porque o sistema tem muitos selects (claro), e estou montando uma rotina pra fazer isso em todos os simpledatasets do sistema...
E preciso também para o SQLQuery.
Obrigado. |
|
| Voltar ao Topo |
|
 |
Batera Colaborador


Registrado: Quarta-Feira, 23 de Julho de 2008 Mensagens: 4899 Localização: Maringá
|
Enviada: Sex Mai 10, 2013 1:18 pm Assunto: |
|
|
Precisa pegar o evento ou a mensagem de erro?
Experimente assim:
| Código: | simpledataset1.close;
try
simpledataset1.open;
except
on E:Exception do
showmessage('Erro: ' + E.Message + #13 + 'Tipo de Erro: ' + E.ClassName);
end; |
|
|
| Voltar ao Topo |
|
 |
mtbteste1 Novato

Registrado: Terça-Feira, 18 de Outubro de 2011 Mensagens: 67
|
Enviada: Sex Mai 10, 2013 3:02 pm Assunto: |
|
|
O código eu conheço...
Preciso fazer uma rotina após o open, mas quando dá erro de select, a rotina não é executada.. |
|
| Voltar ao Topo |
|
 |
|