MySQL Server me cierra conexión

[darkerbyte]

Hola amigo:

Tengo una aplicación que se conecta a WampServer (MySQL) con ZeosLib, desarrollada en Delphi7.

La situación es que en determinado tiempo, varia dependiendo de cada computadora, Wamp me cierra la conexión. Entones cuando el usuario intenta hacer algo con el programa le aparece un feo mensaje de error con este contenido:

"Error (xxx): MySQL Server has gone away"

Me he dado cuenta que la mayoria de las veces es porque se deja de usar el programa y la conexión al no tener actividad es cerrada por el Servidor, pero no hay un tiempo especifico, algunas veces 5 minutos, a veces 10 o 15, nunca es igual en cada maquina. Sin embargo también me ha pasado que en pleno uso se cierra la conexión.

Lo que hice fue poner un botón en el programa que ejecuta esta instrucción:

DM.ZConnection.Reconnect; //Método Reconectar del objeto TConnection de ZeosLib

Con esto Zeos se vuelve a conectar al servidor y el programa vuelve a funcionar. Pero como se imaginan es una lata en primer lugar que aparezca el mensaje de error y estar dándole en "reconectar" cada cierto tiempo, cuando ocurre el error.

Como pueden imaginarse, poner un bloque Try para cada consulta que hace el programa es improductivo, sería como ir al peluquero y pedirle que te corte pelo por pelo.

Estoy pensando poner un Timer que refresque la conexión cada 5 minutos por ejemplo, pero me temo que eleve el uso de el procesador, el uso de la red y el uso del servidor. Además esto no solucionará la situación de que me cierre la conexión cuando esta en pleno uso.

Gracias por tu invaluable consejo, tal vez pasaste por una situación similar, agradecería cualquier ayuda posible