如何从一个存储过程中返回结果

如何从一个存储过程中返回结果？

类似下面的：

var

 sp : TStoredProc;

begin

 sp := TStoredProc.Create(nil);

 with sp do

 begin

   DatabaseName := 'test';

   StoredProcName := 'dbwintech1.johnt;1';

   ExecProc;

   Caption := IntToStr(Params[0].AsInteger);

   Free;

 end;

end;