急！急！急！存储过程控件如何取多结果集，当执行正确时取返回值

由于有些存储过程返回的是多结果集，TStoredProc不支持这类结果，
另外，当存储过程返回值（return)为负值时，
用iReturnValue = StoredProc->ParamByName ( "result")->AsInteger;
可以获得正确的值，
但返回值为正值时，（return 100），该控件总是返回0。
由于条件所限，我现在不可能去更改存储过程，用output类型参数获得返回值，
哪位大虾处理过该问题，请速教之，大恩不言谢，100分奉上。