关于ADOStoredProc1.Parameters自动添加的问题

[zxtyhy]

在设计阶段把ADOStroedProc1的Connection和ProcedureName设好,点选Parameters
属性，将自动得到所连接存储过程的参数，请问如何在程序运行阶段自动添加Parameter

[ether]

TADOStoreProc不太好用，其实直接用SQL语句更方便：
query1.text := 'exec [@return_code=] MyProcedureName @param1 = :P1, @Parm2 = :p2';
然后:
query1.fieldbyname('p1').asstring := 'asdf';
query2.fieldbyname('p2').asinteger := 123;
效果一样的。

[wfmwg]

to:ether(void),你的回答不是人家问的那种情况,我看这个问题也许是个BUG.我以前也是遇到过这样的问题,就是采用楼上您的办法,可是这样还是很麻烦,也许就没有别的好办法.

[wanwangzhiwang]

with ADOStroedProc1 do
begin
active:=false;
Parameters[1].Value:='s;dlkf';
Parameters[2].Value:='ssdf;
Prepared:=true;
ExecProc;
end