conectividad en red?

[[eduarcol]]

Ahorita no tengo delphi a mano pero seria algo asi

Para conectar

Código Delphi [-]
try
   MiConexion.Connected := True;
except
   ShowMessage('No se pudo conectar');
end;

Para el evento AfterDisconect

Código Delphi [-]
   ShowMessage('Se ha desconectado la base de datos');