Excepción EOleException, Mysql has gone away...

[JerS]

si yo puedo tranquilamente capturar la exception con un try pero lo que no se es que hacer para que vuelva a conectar a la base de dato Ejm:

Código Delphi [-]
sw:=false;
try
ADODataSet1.Close;
ADODataSet1.CommandText:=('SELECT curtime()');
ADODataSet1.Open;
label1.Caption:=ADODataSet1.Recordset.Fields.Item[0].value;exception
on EOleException Do
sw:=true;
End;
if sw=false Then
adoconnection1.connected:=true;

ok capturo la exception e intento conectar de nuevo mi coneccion pero es inutil, sigue mostrando el error que les comente...
Recuerden que la idea es retomar la coneccion como si nada ubiece pasado, que el usuario nisiquiera se alla dado cuenta que el servicio de mysql se cayo