ADO事物处理的问题

try  
    ADO.BeginTrans;
    过程A；
    。
    过程B； 
    ADO.CommitTrans;
  except
    ADO_ADO.RollbackTrans;
  end没有出现异常，但是过程A就是没有效果，取消事物后过程A就有效果了，请高手指教