Activar muchos Query.

[paladincubano]

Hola foreros again.

Tengo un datamodule con hasta 30 Querys que uso. Normalmente cuando estoy programando los tengo todos en Active=True.
Pero cuando llevo el programa a la oficina para que funcione bien, los desactivo todos y su Adoconection tambien y los activo por codigo porque tengo que cambiar el ConnectionString (la BD esta en SQLExpress 2005) en el create del datamodule. Todo funciona bien.
Ahora mi pregunta.
Una vez que regreso a casa a trabajar, tengo que de nuevo activar MANUALMENTE todos esos querys para trabajar en tiempo de diseño.
Hay alguna forma en el datamodule de decirle que todos los ADOQuery Active=True??? Es un poco pesado ir de uno en uno y activarlos (no vale seleccionarlos todos y activarlos, es casi lo mismo)
Gracias.