CreateDataset(Src : Dataset) : Dataset
Создание копии датасета.

Функция CreateDataset создает копию датасета.

Procedure OnCreate;
Var
  Src : Dataset Of Record A, B : String; End;
  Copy : Dataset;
  Copy2 : Dataset Of Record A, B, C : String; End;
Begin
  Src[Src.Append].A := 'Hello';
  
  // Копируется как структура, так и данные датасета
  Copy := CreateDataset(Src);
  Warning(ToStr(Copy.Count));

  // Изменение исходного датаесета не влияют на копию
  Src[Src.Append].A := 'World';
  Warning(ToStr(Copy.Count));
                             
  // Осуществляется контроль типов во время ввода и строка ниже не будет
  // скомпилирвоана. Возращаемый тип данных Функций CreateDataset
  // идентичен аргументу.
  Copy2 := CreateDataset(Src);
End;

© RTIT