真是神奇,不知为何?

Question

有一(SQL)存储过程,内容这样:CREATE PROCEDURE She_Goall 
@str1 varchar(8000)
as
begin
   select * from a where name in(@str1)
end
在SQL查询分析器中用语句调用,可以正确返来结果集(exec She_Goall '00890')
无奈地用DELPHI语句调用为什么没有返回结果呢?DELPHI的调用如下:procedure TForm1.Button1Click(Sender: TObject);
var
sv:string;
i:integer;
begin for i :=0  to ComboBox1.Items.Count-1 do begin
    if sv='' then
    sv:=QuotedStr(ComboBox1.Items.Strings[i])
    else
    sv:=sv+','+QuotedStr(ComboBox1.Items.Strings[i]);
 end;
 with ADOStoredProc do begin
      close;
      ProcedureName:='She_Goall';
      Parameters.Refresh;
      Parameters.ParamValues['@str1']:=sv;
      open;
 end;
end;

Answer 1

CREATE PROCEDURE She_Goall @str1 varchar(8000) as begin  
exec('select * from a where name in('''+@str1+''')') 
end
试试这样