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