ADO 中处理多个返回结果集

 在使用 SQL 语句时，常常会有多个结果集被返回的情况，比如 EXEC sp_helpconstraint [TableName] 就返回了两个结果集。如果我们需要处理多个结果集时。可用ADO的 NextRecordSet 方法。用法如下：

var
  R: integer
begin
  with ADOQuery do
  begin
    Close;
    SQL.Text := 'EXEC sp_helpconstraint ' + ableName;
    Open;
    R := 0;
    Recordset := NextRecordSet(R);
    {do something }
    
 end