[Faust]

Desde los objetos Database, como TADODatabase y TDatabase puedes consultar la propiedad Connected, y en objetos Table y Query la propiedad Active.

Un detalle amigo Duilioisola... cuando en un query ejecutas un SQL que te devuelve un conjunto de datos (p. ej. un SELECT), lo debes ejecutar con Open y cuando el SQL no te devuelve un conjunto de datos (p. ej. INSERT o UPDATE), lo debes ejecutar con ExecSQL. ExecQuery es de TIBSQL y no tiene interfaz para controles DBAware.

Saludos