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