Cuantos TIBDataSet estan abiertos

[[Lepe]]

afxe, me ha gustado mucho tu solución.

¿Se podría complementar con herencia visual?

Pensando en voz alta:
-Crear un form llamado TBaseForm añadiendo un TIBransaction, un TIBdataset y el uses al datamodule principal de la aplicación (para tener acceso al TIBDatabase).
- En TBaseForm, crear propiedades (property) para acceder cómodamente a los 2 componentes anteriores, además de un par de rutinas para hacer commit y rollback cómodamente.

Ahora, cuando quiera crear una nueva ventana, heredo visualmente de TBaseForm, con lo cual tendría:
- una nueva ventana
- un transaction asociado sólo a esa ventana
- Por defecto un TDataset que se usaría para los datos principales del Form.
- facilidades para hacer commit o rollback.

¿qué opináis?

Saludos