Hola DTar
Creo que en el datamodule podrias poner algo asi:
Código Delphi
[-]
If ZConnection1.Connected = False then;
MessageBox(Handle,
PChar('Se ha desconectado del servidor' + #13#10 +
''),
PChar('Conexion'),
MB_OK + MB_DEFBUTTON1 + MB_APPLMODAL);
Creo que podrias capturar el mensaje antes que el error
No se intentalo, nada se pierde.
Saludos