Comprobar la conexion al servidor de bd

[fjolivares]

Hola a todos!, yevo un mes aprox. metiendome en el mundo de firebird. hay va mi pregunta: como compruebo de una manera correcta que mi programa se puede conectar al servidor de bd, informando al usuario en el caso de que no pueda conectarse? Saludos a todos

[__cadetill]

Yo lo haría con un bloque try...except...end

Pongo el ejemplo con componentes del BDE pero sería lo mismo con cualquier otro

begin
  try
    Database1.Open;
  except
    on E: Exception do
      ShowMessage('No se ha podido conectar. Mensaje de error:'#13+E.Message);
  end;
end;

Espero te sirva

[fjolivares]

Gracias Cadetill, pero aun así, cuando para el servidor firebird, se pone a lanzar access violations y errores a punta pala. no se podría comprobar la IP p el funcionamiento de servidor de otra manera?

Saludos y gracias.

[__cadetill]

Si te entiendo bien, te refieres a que arranca el motor, empiezas a trabajar normalmente y, por lo que sea, cae (o se para) el motor.

Si es este caso, lo raro es que te dé Access Violation. Este tipo de error es por hacer referencia a objetos que no están creados, pero no por no poder hacer, por ejemplo, un Open de una tabla.

De todas maneras, te aconsejo englobar las operaciones de las tablas también entre bloques try...except...end, tanto la obertura, como las modificaciones/inserciones.

Otra cosa que podrías mirar es de debuguear el programa y mirar en qué linea está dando el error (una vez parado el motor)

[fjolivares]

weno, me explocp mejor . yo tengo ya mi programa funcionando, solo estoy planteandome el caso de que un cliente ejecute el programa y por ejemplo no tenga red en ese momento, me gustaria ponerle un mensaje amigable indicandole el problema.

saludos y gracias

[__cadetill]

Pues si es en el momento de arrancar el programa, es en el momento de activar la conexión, por lo que te sirve el primer mensaje que te he enviado, poniendo en el ShowMessage el mensaje que más te guste