[[Caral]]

Hola
Yo lo hago asi:

Código Delphi [-]
 except
        on E:Exception do
        begin
           u.Transaction.RollbackTrans;
           MessageDlg('No fue posible completar la transacción',mtError,[mbOK],0);
        end;

Saludos