hola tengo el siguiente problema en el evento OnPostError de un ADOTable
Código Delphi
[-]if (E is EDatabaseError) then
begin
Action := daAbort;
Showmessage('Codigo Repetido'); end else
begin
Showmessage('Codigo Cambiado con exito');
end
Cuando el codigo no esta repetido deberia salir Showmessage('Codigo Cambiado con exito'); pero no sale?, claro aqui yo quiero poner otras instrucciones pero para no complicar la explicacion pongo un mensaje
alguien tiene alguna idea que estoy haciendo mal?
salu2