求助：向各位大哥请教一个 output 参数的问题，谢谢！

请教：
问题1：
create procedure protest11
@sno varchar(50),
@rr  varchar output 
as
  select *
  from test1
  if sno=@sno
     @rr='ok'
  else 
     @rr='no'提示是：
@rr  varchar output  有错误，各位大哥，我是错在哪里呢？
问题2：
我在 delphi 怎么调用这个存储过程：
ADOStoredProc1.Close;
ADOStoredProc1.ProcedureName:='ProfixbfNowPlayGameGroundTable';
ADOStoredProc1.Parameters.Clear;
ADOStoredProc1.Parameters.CreateParameter('@sno',ftstring,pdinput,50,trim(edit1.Text));
ADOStoredProc1.Parameters.CreateParameter('@rr',ftstring,pdoutput,8,'');
ADOStoredProc1.open各位大哥，
ADOStoredProc1.Parameters.CreateParameter('@rr',ftstring,pdoutput,8,'');写错了吗？要怎么写？问题3：
我怎么得到 outpu 参数的返回值？谢谢！