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

如何从一个存储过程中返回结果？ 类似下面的：
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;