storedprocresult

Q: How do I get the result from a TStoredProc?

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;