如何用Tadostoredproc从SQLServer的存储过程中自动获得参数？(10分)

如何用Tadostoredproc从SQLServer的存储过程中自动获得参数？
我不想在Tadostoredproc的Parameters中建立参数，而想用
adostoredproc1.Parameters.Value:='...'
来直接对参数给值使用。

以前我实现过，好象Tadostoredproc中有个方法可以实现，不过想不起来了。

用adostoredproc1.parameters.refresh;

我用adoquery时试过下面的法子
s:='insert into class(date,time) valuesdate,:time)';
adoquey1.parameters.items[0].value:=trim(edit1.text);
adoquey1.parameters.items[1].value:=trim(edit2.text);
好像可行,试试看

给你看一个我今天刚写完的东东，不要用adostoredproc
最好全用adoquery，这样程序比较有扩展性而不局限于某种数据库
function TRegisterMainFrm.Validate_Workstation(
const WorkstationName: string):boolean;
var FQuery:TADOQuery;
begin
try
FQuery:=TADOQuery.Create(Application);
FQuery.Connection:=HisDM.HisCon;
{Validate_Workstation是一His数库中的存储过程名}
FQuery.SQL.Add('Exec Validate_Workstation WN,Is_Exist output');
FQuery.Prepared:=true;
FQuery.Parameters.ParamByName('@WN').Value:=WorkstationName;
FQuery.ExecSQL;
if FQuery.Parameters.ParamByName('@Is_Exist').Value=-1 then
result:=False
else
result:=True;
finally
FreeAndNil(FQuery);
end;
end;

多人接受答案了。