try except no Delphi 6 usando TSQLClientDataSet

Delphi

10/07/2003

Já vi algumas mensagens sobre o assunto mas nenhuma resolveu o problema, que é o seguinte:

- Tenho uma tabela PROPRIETARIOS e outra IMOVEIS, onde o CODIGO_PROPRIETARIO faz a CHAVE ESTRANGEIRA, ocorre que, se eu tento deletar o proprietário o bd retorna o erro mas o TSQLClientDataSet não consegue capturá-lo, detalhe, se eu utilizar os componentes de acesso à dados normais como TQuery, o exception funciona, só que estou utilizando os componentes do DbExpress

o código está da seguinte maneira:

try
SQLClientDataSet_Proprietarios.Delete;
except
{ texto capturando o E.Message }
end;

Aguardo sugestões...


Wagnerpb

Wagnerpb

Curtidas 0

Respostas

Fred

Fred

10/07/2003

coloque no evento OnReconcileError do SQLClientDataSet

showmessage(e.message); //o erro retorna neste e.message 8)


GOSTEI 0
Wagnerpb

Wagnerpb

10/07/2003

:D

Obrigado Fred, realmente funcionou....

À propósito, vc sabe pq não funciona durante o post?


GOSTEI 0
Wagnerpb

Wagnerpb

10/07/2003

Obrigado Fred, realmente funcionou....

À propósito, vc sabe pq não funciona com o try except?


GOSTEI 0
POSTAR