Manejar un Error al desconectarse MYSQL

[jandok238]

En efecto..... ya revise.... y como yo lo tenia o trataba de hacer era :

Código Delphi [-]
 if (ZConnection.Connected = False) then
 begin
   Mensaje('No hay conexion');
   Cerrar_Programa
 end;

pero siempre me detectaba esa propiedad en TRUE, aunque no estuviera conectada.....

Lo que hice, en base a la ultima respuesta de AcidRain, fue por medio de una consulta (sin sentido o una simple) para detectar si hay conexion :

Código Delphi [-]
 try 
   ZQuery.SQL.Text := 'SHOW TABLES'; 
   ZQuery.Open;
 except
   Mostrar mensaje de error;
   Cerrar la aplicacion;
 end;

Pues muchas gracias ......

Salu2!!!!!!!!