ADOStoredProc->ExecProc()之后数据库中数据没有变化，咋回事呢

ADOStoredProc->ExecProc()之后数据库中数据没有变化，怎么回事呢？
代码如下：
ADOStoredProc1-> Close();
ADOStoredProc1-> ProcedureName   =   "ACCTBOOK_TRANS ";
ADOStoredProc1-> Parameters-> Clear();

ADOStoredProc1-> Parameters-> CreateParameter(lbledt8-> Text,ftString,pdInput,30,OleVariant(0));
              ADOStoredProc1-> Parameters-> CreateParameter(lbledt9-> Text,ftString,pdInput,30,OleVariant(0));
              ADOStoredProc1-> Parameters-> CreateParameter(lbledt10-> Text,ftString,pdInput,30,OleVariant(0));
              ADOStoredProc1-> Parameters-> CreateParameter(lbledt11-> Text,ftString,pdInput,30,OleVariant(0));
              ADOStoredProc1-> Parameters-> CreateParameter(lbledt12-> Text,ftString,pdInput,30,OleVariant(0));
              ADOStoredProc1-> Prepared   =   true;
              try
              {
                    ADOStoredProc1-> ExecProc();
              }
              catch   (Exception   &E)
              {

                    ShowMessage(AnsiString(E.ClassName())   +   "   "   +   E.Message);
                    ADOStoredProc1-> Close();
              }

执行完了什么变化也没有，有什么问题呢？

------解决方案--------------------
你这个过程是做什么？新增？修改？