Fórum esconder a msg key violation - onposterror #213581
12/02/2004
0
ola pessoALL, to voltando...
alguem sabe como eu faço pra que não apareça a msg Key Violation qdo houver um OnPostError na tabela ???
Eu coloco a minha msg para a violação da chave, mas alem da minha o Delphi mostra e dele...
abraços e valeu´s !!!
magicbyte
alguem sabe como eu faço pra que não apareça a msg Key Violation qdo houver um OnPostError na tabela ???
Eu coloco a minha msg para a violação da chave, mas alem da minha o Delphi mostra e dele...
abraços e valeu´s !!!
magicbyte
Magicbyte
Curtir tópico
+ 0
Responder
Posts
12/02/2004
Delphi32
Se eu entendi bem acho que se vc colocar o seguinte funciona:
procedure TForm1.Table1PostError(DataSet: TDataSet; E: EDatabaseError; var Action: TDataAction);
begin
if E.Message=´Key violation.´ then
begin
MessageDlg(´Sua mensagem de erro!´,mterror,[mbok],0);
Action := daAbort;
end;
end;
procedure TForm1.Table1PostError(DataSet: TDataSet; E: EDatabaseError; var Action: TDataAction);
begin
if E.Message=´Key violation.´ then
begin
MessageDlg(´Sua mensagem de erro!´,mterror,[mbok],0);
Action := daAbort;
end;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)