Cerrar todos los TIBquery de una aplicacion
Hola gente del foro, un problemita.
Tengo una aplicación que tiene alrededor de unos 150 formularios. En la mayoria de estos existen TIBQuery. Utilizo Delphi 2006
El problema es que se me quedo algun Query abierto, y cada vez que trato de compilar el programa me arroja el error de que el la existe la BD.
En el componente IBDataBase, el databasename lo tengo sin nada, ya que una vez que se ejecuta el programa se escoge la forma de como conectarse.
Lo que necesito, es que al crearse el Form principal (Form1), cheque todos los componentes de la aplicación, inclusive si estan en otro formulario, y en caso de que sea un TIBQuery, lo cierre.
Como puedo hacer esto.
Saludos
|