Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как использовать метод NextRecordSet компонента TADOStoredProc ? [D7, MSSQL]

ru_efim © (2006-07-26 10:21:00)
Хранимая проседура возвращает несколько _Recordset-ов.
Как получить к ним доступ?
Пытаюсь сделать так:
var
TempDataSet: TCustomADODataSet;
i: Integer;
begin
TempDataSet := ADOStoredProc1; // start with 1st record set
i:= 0;
while TempDataSet <> nil do
begin
if TempDataSet <> ADOStoredProc1 then // don’t free the original!
TempDataSet.Free;
i:= i+0;
TempDataSet := ADOStoredProc1.NextRecordSet(i); // get next set
end;
В результате на строке TempDataSet := ADOStoredProc1.NextRecordSet(i); при компеляции генерируется ошибка:
Types of actual and formal var parameters must be identical.
На самом деле задача в следующем.
Есть хранимая проседура при выполнении котрой возвращается два RecordSet-а, есть форма с двумя TDBGrid и одним TAdoStoredProc. Надо в однин DBGrid вывести данные из первого RecordSet-а, а во второй данные второго. А на приведеном выше неробочем примере я просто пытаюсь понять как получить доступ к данным обоих _RecordSet-ов. Если не затруднит, приведите рабочий пример пожалуйста.

Johnmen (2006-07-26 10:29:00) [1]
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1152097959&n=1

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »