Tratando o msg de UNIQUE KEY no Delphi

Delphi

29/07/2014

Olá!

pessoal estou com a seguinte situação:
eu preciso que o delphi retorne uma mensagem personalizada para usuário ao tentar inserir o registro com o valor igual em um campo que seja UNIQUE KEY e não aquela mensagem para programador.

Importante é que esse tratamento seja feito pelo delphi e não pelo firebird!


Agradeço.
Marcos Roberto

Marcos Roberto

Curtidas 0

Respostas

Marisiana Battistella

Marisiana Battistella

29/07/2014

Olá!
Você tem que realizar o tratamento de exceções. Nesses dois links tem algumas explicações:
Tratamento de exceções - parte 1
Tratamento de exceções - parte 2

Espero que sejam úteis!
GOSTEI 0
Marcos Roberto

Marcos Roberto

29/07/2014

Oi!

Então , eu estou tentando assim:

Try
Database.Table.Post;
Except
on E: Exception do
begin
ShowMessage('msg teste');
end;
end;


e mesmo assim a mensagem UNIQUE KEY continua a aparecer antes da mensagem do except.

Tem algum sugestão??
GOSTEI 0
Deivison Melo

Deivison Melo

29/07/2014

Bom dia,

dá uma olhada no componente: Application Events


[url]https://www.devmedia.com.br/quick-tips-applicationevents-do-delphi/15169[/url]

Abraçao e bons códigos!!!
GOSTEI 0
Marcos Roberto

Marcos Roberto

29/07/2014

Boa dia!!

problema resolvido.

Na verdade o Try que eu estava usando já estava dando certo, mas como eu uso o delphi 2010 tive que desabilitar esta opção "Notify on language exceptions" que fica no menu Tools > Options > Debugger Options > Embarcadero Debugger > Language Exceptions .


Agradeço pela ajuda Marisiana e Deivison.

Grato.
GOSTEI 0
Marisiana Battistella

Marisiana Battistella

29/07/2014

Por nada! =) É sempre bom ajudar!
GOSTEI 0
POSTAR