Dataset.Append : Integer
Добавить строку в конец таблицы

Метод Dataset.Append добавляет пустую строку в конец датасета и возвращает номер добавленной строки.

Procedure OnCreate;
Var 
  D : Dataset Of Record Name : String; Age : Integer; End;
  i : Integer;          
Begin           
  i := D.Append;
  D[i].Name := 'Алексей';  
  D[i].Age := 20;
  
  i := D.Append;
  D[i].Name := 'Андрей';  
  D[i].Age := 25;
            
  i := D.Append;
  D[i].Name := 'Петр';
  D[i].Age := 30;
  
  Foreach E in D do
    Warning(E.Name + ', ' + ToStr(E.Age));

  // Будет выведено:
  // Алексей, 20
  // Андрей, 25
  // Петр, 30
End;

© RTIT