esconder a msg key violation - onposterror
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
Curtidas 0
Respostas
Delphi32
12/02/2004
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;
GOSTEI 0