在delphi中动态创建ADOStoredroc的问题！！！！！！！！！！（高手请进）

Question

with TADOStoreProc.Create(self) do
try
  connection:=adoconnect1;
  Procedurename:='proc1;1';
  parameters.createparameter('RETURN_VALUE',ftinteger,pdreturnvalue,0,0);
  parameters.createparameter('@A',ftinteger,pdreturnvalue,0,0);
  
  adoconnect1.begintrans;
  try
    prepared:=true;
    execproc;
    adoconnect1.committrans;
  except
    on e:exception do
    begin
       adoconnect1.rollbacktrans;
       showmessage(e.message);
    end;
  end;
finally
  free;
end;
上面是我的动态连接存储过程的程序。该程序基本正常，但是程序有时执行完毕会象死机一样，没有任何反映，是不是我的程序有问题？清高手帮我分析一下！

Answer 1

是不是数据量很大？设一下该控件的CacheSize值看看