CreateDataset(Fields : String) : DataSet
Создание объекта DataSet.

Функция CreateDataset создает датасет с определенной в аргументе Fields со структурой полей.

Аргумент Fields содержит строку в формате {ИмяПоля {, ИмяПоля} : ТипПоля;} или ТипПоля { , ТипПоля}. Допустимые типы полей: String, Integer, Float, Currency, DateTime, Boolean, Blob.

Procedure OnCreate;
Var
  D : Dataset;
Begin
  // Создание
  D := CreateDataset('Id : Integer; Name : String; Price, Weight : Float;');
  
  // Запись
  D.Count := 2;
  D[0,'Id'] := 1; D[0,'Name'] := 'Яблоко'; D[0,'Weight'] := 300;
  D[1,'Id'] := 3; D[1,'Name'] := 'Груша';  D[1,'Price']  := 10.3;
  
  // Вывод
  Warning(ToStr(D));
End;

Функции DirectQuery, Query, типизированные датасеты и непосредственные запросы и так создают датасет, поэтому для работы с ними эта функция не нужна.

Пример типизированного датасета:

Procedure OnCreate;
Var
  D : Dataset Of Record Id : Integer; Name : String; Price, Weight : Float; End;
Begin
  // Запись
  D.Count := 2;
  D[0].Id := 1; D[0].Name := 'Яблоко'; D[0].Weight := 300;
  D[1].Id := 3; D[1].Name := 'Груша';  D[1].Price  := 10.3;
  
  // Вывод
  Warning(ToStr(D));
End;

Пример непосредственного запроса:

Procedure OnCreate;
Var
  D : Dataset;
Begin
  // Получение данных
  D := (Select Id, Name, Price, Weight From Fruits);

  // Вывод
  Warning(ToStr(D));
End;

© RTIT