Ver Mensaje Individual
  #3  
Antiguo 19-11-2015
mjjj mjjj is offline
Miembro
 
Registrado: mar 2007
Posts: 652
Reputación: 18
mjjj Va por buen camino
Gracias mamcx por tu pronta respuesta, y entiendo lo que expones, sin embargo, y siguiendo con la idea de DataSnap como llamo a una función/procedimiento tal que si arroja algún problema lo informe al usuario y no se cuelgue??

Código Delphi [-]
var myServer : TDSEmpresaClient;
begin
try

if sqlconnection1.connected then
sqlconnection1.close;
sqlconnection1.open;

mistareas.close;

myServer := TDSEmpresaClient.Create(form1.SQLConnection1.DBXConnection);
myServer.mis_tareas(strtoint(Edit1.Text));
myServer.Free;

mistareas.Open;

except
try
sqlconnection1.Close;
sqlconnection1.Open;

finally
  TrayIcon1.BalloonHint := 'Problema de red.'+#13+ 'Intentando conección...';

  TrayIcon1.Animate := True;
  TrayIcon1.ShowBalloonHint;

end;
end;

claramente el código que agrego no es el ideal ya que mi aplicación sigue colgándose.
Es buena idea cada vez que necesito algún dato de la base de dato abra la conección, consulte lo necesario y finalmente cierre la conección?? o es mejor mantener la conección abierta y manejar los errores??

Ayuda con el código...
Gracias.
Responder Con Cita