如何读取显示存储过程执行完后的结果？这是我的代码？急！！

Question

procedure TForm1.Button1Click(Sender: TObject);
var
  i:integer;
begin
with adostoredproc1 do
begin
   close;
   parameters.clear;
   adostoredproc1.ProcedureName:='byroyalty';   // Parameters.clear;
   Parameters.CreateParameter('@royaltyper',ftstring,pdinput,6,0);
   parameters.ParamValues['@royaltyper']:=400;
   adostoredproc1.Prepared;
   adostoredproc1.ExecProc;
   //stringgrid1.RowCount:=adostoredproc1.RecordCount+1;
   //first;
   for i:=1 to adostoredproc1.recordcount do
   begin
     stringgrid1.Cells[1,i]:=parameters.ParamValues['au_id'];
     next;
   end;
end;
end;

Answer 1

用Query吧
    Query.Close;
    Query.SQL.Clear;
    Query.SQL.Add(‘SQL 语句’);
    Query.Open;

Answer 2

呵呵，用ADOQUERY做的话，如果你有数据集，就可以象平时的那种方式访问

Answer 3

1 你没有'au_id'这个参数啊
2 Parameters.CreateParameter('@royaltyper',ftstring,pdinput,6,0);
@royaltyper也不是output参数，你怎么得到传回值啊！
3 为什么是stringgrid1而不是dbgrid1？