IDtProvider.Fetch

Синтаксис

Fetch(Var Values: Array);

Параметры

Values - одномерный массив, в который будут помещены считанные значения текущей записи в источнике данных.

Описание

Метод Fetch осуществляет чтение данных текущей записи из источника данных. После чтения данных курсор в источнике перемещается на следующую запись.

Пример

Для выполнения примера предполагается наличие в корневом каталоге диска С файла "Data.xls".

Sub Main;

Var

ExcelProvider: IDtExcelProvider;

v: Array;

i: Integer;

Begin

ExcelProvider := New DtExcelProvider.Create;

ExcelProvider.File := "c:\Data.xls";

ExcelProvider.DriverVersion := "Excel 8.0";

ExcelProvider.Query := "Select * From [Лист1$]";

ExcelProvider.HasHeader := False;

ExcelProvider.Open;

While Not ExcelProvider.Eof Do

ExcelProvider.Fetch(v);

For i := 0 To v.Length - 1 Do

Debug.Write(v[i] + " ");

End For;

Debug.WriteLine("");

End While;

ExcelProvider.Close;

End Sub Main;

После выполнения примера будет создан новый источник данных, осуществляющий импорт данных из файла Excel. Из файла будут считаны значения всех записей, первая строка не будет рассматриваться как строка с именами полей. Полученные значения будут выведены в консоль среды разработки.

См. также:

IDtProvider