Buenos días amigos foreros.
Tengo una aplicación que se conecta a una base de datos que está en otro equipo; la red es de tipo wifi. ultimamente he tenido problemas son el suministro de energía, haciendo que el programa se desconecte de la base de datos. me gustaría saber cómo puedo restablecer la conexión sin necesidad de reiniciar el programa.
Tengo un procedimiento para la conexion de la base de datos
Código Delphi
[-]function TfDatos.Conectardb(ruta: string): Boolean;
begin
try
Result:= True;
Conexion.Connected:= False;
Transaction.Active:= False;
Conexion.DatabaseName:= ruta;
Conexion.Connected:= True;
Transaction.Active := True;
except
on e:Exception do
begin
MessageDlg('Informex Archivador', e.Message, mtError, [mbOK], 0);
Result:= False;
end;
end;
end;
pensé que simplemente con una llamada al procedimiento en el momento en que fallara el suministro energético era suficiente para volverme a conectar.
el error que me muestra es el siguiente:
-Unable to complete network request to host "sistemas"
-
Failed to establish a connection.
De antemano mil gracias por vuestro tiempo
Gustavo Cruz