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!!!!!!!!