Problema con excepsión y transacción

[mpedra]

Si está en true

Aparentemente la instancia de TDabase1 permance dentro de la transaccion fuera del try except donde capturo el error. (ya que hago un Database1.Intransaction y me da true). Pero si hago un commit o un rollback me da el error de que no tengo transaccion activa.