存储过程返回数据集

Question

我现在写一界面，上面几个编辑框edit，一个查询按钮button，下面一个stringgrid组件，我数据库里有一存储过程sp_query_toperator,几个输入参数@in_op_code,,,,,我现在想点查询按钮，通过调用存储过程，返回记录集，并显示在stringgrid中，我想请教各位，调用存储过程，返回结果集的这几条语句怎么写？

Answer 1

调用存储过程可以用ADOStoredProc，返回数据集和ADOQuery没什么两样

Answer 2

I want to know if I can insert or append the record with a return dataset's stored procedure? any ideas? For example,CREATE PROCEDURE [spHD_CostIts]
       @JobUID Uniqueidentifier
 ASSelect ID, JobUID, UID,ParentUID, Wbscode from J1_HD_CostItems
where JobUID = @JobUID
GOIf I can call it in Delphi and new insert records

Answer 3

Create Procedure GetName
  (
    @Num int,
    @Tmp varchar(50) output
   )
As
Begin
  declare @GetNum Int
  Select @GetNum=@Num+1
  Select @Tmp=Convert(varchar(50),@GetNum)
Endprocedure TForm1.Button1Click(Sender: TObject);
Var
  Tmp:string;
  Num:Integer;
  sqlstr:string;
begin
  Num:=10;
  sqlstr:=' Declare @Tmp Varchar(50)'+
          ' Declare @Num Int'+
          ' Select  @Num='''+IntToStr(Num)+''''+
          ' exec    GetName @Num,@Tmp output'+
          ' Select  @Tmp';
  With ADOQuery1 do
  begin
    Close;
    Sql.Clear;
    sql.Add(sqlstr);
    open;
  end;
  Edit1.Text:=ADOQuery1.Fields.Fields[0].AsString;
end;