急！请各位不吝赐教一个关于在delphi程序中执行数据库存储过程的问题

Question

我在
Sqlserver 数据库上建了一个存储过程名字叫Oil_sum_pirce,如何在Delpih程序化中调用并取得其返回值，谢谢！

Answer 1

query.active:=false;
query.sql.text:='exec oil_sum_pirce :param';
query.active:=true;
result:=query.Parameters.ParamValues['param']

Answer 2

用AdoStoredProc控件即可，该控件的ProcedureName设为你这个存储过程名Oil_sum_pirce
如果该存储过程有参数，则with AdoStoredProc1 do
  begin
     Parameters[1].Value:=参数1;
     Parameters[2].Value:=参数2;
     Parameters[3].Value:=参数3;
     Prepared;
     ExecProc;   //如果存储过程返回数据集，用Open语句
  end;