ADOStoredProc怎么得到反回值？

[downkey]

存储过程：
CREATE procedure test
@tempinput int,
@tempoutput int output
as
select @tempoutput=count(hgnum) from numcount where hgnum=@tempinput

程序：
ADOStoredProc2.Parameters.Refresh();
ADOStoredProc2.Parameters.parambyname('@tempinput').value:=strtoint(edit1.text);
ADOStoredProc2.Prepared;
ADOStoredProc2.ExecProc;
R:=ADOStoredProc2.Parameters.parambyname('@tempoutput').value
if r<1 then
......
问一执行程序后，错误提示：存储过程test需要参数，@tempoutput但未提供？请帮我修改一下？thanks

[outer2000]

ADOStoredProc2.Parameters.add;

[nyf1220]

在它的parameters属性里可以添加你的 出口和入口值，
楼上动态方法就是了

[downkey]

在它的parameters属性有@tempoutput呀？

[downkey]

gz

[downkey]

请高手看一下程序，错在何处？