Lo tengo casi listo de la siguiente forma:
En el evente Create del Modulo de datos pongo lo siguiente:
Código Delphi
[-]
Application.OnException := AppException;
Y llamo a un procedimiento llamado AppException que hace lo siguiente, comprueba si la excepción es la que busco y si lo es hago las instrucciones que me hacen falta:
Código Delphi
[-]
procedure TdatDatosRemoto.AppException(Sender: TObject; E: Exception);
begin
If (E.Message = 'mensaje que quiero capturar) then
begin
Instrucciones que quiero hacer.
End;
end;
Me falta un poco para ver como reconectar con la BD, pero la excepción la capturo bien. Lo he probado fuera de delphi.
Gracias y saludos.