Problema con transacciones en Access y Delphi

[Capi666]

Hola a todos, tengo un pequeño problema a ver quien me lo puede solucionar, supongamos que tengo:

StartTransaction();
Sql.Add('insert ...............');
Sql.Add('insert ...............');
Commit();

Pero resulta que quiero que el access me saque sus excepciones para comprobar que no se insertan dos tuplas con la misma clave primaria, entonces si ejecuto eso una vez e inserto algo que ya esta, me salta al excepcion y el problema es que la transaccion se queda abierta... ¿Como la podría cerrar?

Gracias!!!

[delphi.com.ar]

Capi666, por favor no abras mas de un hilo para la misma pregunta, y lee la Gía de Estilos para participar cordialmente en los foros. He borrado los hilos repetidos en otros foros.

Código Delphi [-]
StartTransaction();
Try
  Sql.Add('insert ...............');
  Sql.Add('insert ...............');
  Commit();
except
  RollBack;
  raise;
end;